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NEUHEITEN 


mit LADEGARANTIE für 


Colour Genie 


Das Colour Genie Buch 


Das COLOUR GENIE BUCH aus unserem Verlag bringt unter anderem: Neue und alte ROM’s im Ver- 
gleich, alle Z80 Maschinenbefehle in übersichtlicher Form, Joysticks-selbst gebaut, was braucht man 
an Software, wie arbeitet man mit dem Bildschirmsteuerungs-IC, wie programmiert man den PSG 
(Programmier. Sound Generator), wie baut man Maschinenprogramme in Basicprogramme ein, alles 
mit vielen Beispielprogrammen, viel Software zum abtippen, und, und, und ... 

Das COLOUR GENIE BUCH von uns müssen Sie haben! Es bringt Ihnen viele Informationen, die Sie 
nötig brauchen. Für Anfänger und Profis! 

Subskriptionspreis bis zum 15.Juni 1984: Nur 39,-- DM!!! Ab 16. Juni 1984 49,-- DM. 

Also bestellen Sie sofort!!! Lieferbar ab 15.6.1984. 


Screen-Editor 


Ärgern Sie sich immer noch mit dem Edit-Befehl rum? Das muß aber nicht mehr sein!!! 
Der beste Bildschirmeditor, den wir kennen, kostet bei uns nur 29,-- DM auf Cassette und nur 36,-- DM 
auf Diskette! DAMIT HABEN DIE QUALEN EIN ENDE!!! 


Spooler 


Für Genie I, Il usw, 

Warten Sie nie mehr auf Ihren Drucker! Unser Spooler ist geeignet für alle Speichergrößen, er hat 
einen beliebig einstellbaren Puffer, er arbeitet mit allen bekannten Betriebssystemen, auf Diskette und 
Cassette! Preis Disk nur 49,-- DM! Preis Cassette nur 39,-- DM! Bei Diskette unbedingt verwendetes 
Betriebssystem angeben! 


Ramschkiste: & & & 


Hier wollen wir Ihnen ein paar Programme anbieten, die nicht mehr unserem Qualitätsstandard ent- 
sprechen, und die wir deshalb ausverkaufen. Für diese Programme gilt unsere Ladegarantie nicht! 

Alle Programm liefern wir nur auf Cassette und nur solange der Vorrat reicht! 

Jedes Programm zum Preis von DM 9,90!!! Bestellen Sie sofort, der Ramschkistenpreis gilt für: 

Paclab I, Paclab Il, Dame, Reversi, Vier gewinnt und Othello! 


Ausserdem immer noch: SUPER-ASSEM, ASTRAY, VORTEX, PAC-BOY, COLDAT und alle unsere 
anderen Superprogramme, fordern Sie unbedingt unsere kostenlose Liste an! 


Bestellen Sie noch heute bei: Haben Sie ein gutes Programm für das Colour Genie? Egal ob Basic, 
Ralf M. Hübben, Maschinensprache oder compiliert! Wenden Sie sich an uns| Wir 
Verlag für Computertechnik, bieten Ihnen für ein gutes Programm ein gutes Honorar! Oder ken- 
Mühlbachstraße 2, nen Sie vielleicht einen Grund, warum Sie sich nicht mit Ihrem 
5429 Marienfels/Ts. Hobby ein paar Mark nebenher verdienen sollen ? 
Selbstverständlich sind wir auch daran interessiert, gute Hardware 
für das Colour Genie mit Copyrights zu kaufen ! 
Schreiben Sie uns oder rufen Sie an: Telefon 067 72-7828, 





Neues auf dem Markt 


Für den Anfänger 


Wieder unsere beliebte Rubrik, in 
der wir Ihre Fragen klären 


Sound total 


Hier ist die Selbstbauanleitung, 
für alle, denen der Ton aus dem 
Fernseher zu mickrig ist 


Mad Driver 


Ein Superspiel für das Colour Genie 
in Maschinensprache. Abtippen und 
losfahren ist hier die Devise! 


Invers 
Besitzer: eines: Commodore haben 

es jaschön! Sie können ganz einfach 
Schrift auch invers darstellen. 

Mit diesem Programm wird 9 das aueh für 
Sie. moi 1 








Assembler — Teil 4. 

Und weiter geht es mit unserem 
Assemblerkursus für alle Computer 
Freunde. Machen Sie fleißig mit, 
dann sind Sie auch bald ein Profil! 


Solitair 
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Hier bringen wir das beliebte Denkspiel N 


für alle Colour Genie Besitzer. 
Übrigens werden Sie sich warschein- 
lich über die fantastische Grafik 
wundern! 


Seite 28 


Kontaktkarten 


GENIE DATA 3 


TEXEDIT 


Hier bieten wir Ihnen ein ganz fan- 
tastisches Textverarbeitungsprogramm 
für Genie I, 11, TRS 80 M1 und M3. 
Dieses Programm ist so gut, daß man es 
durchaus für geschäftliche Verwendungs- 
zwecke benutzen kann. 


Da bleiben keine Wünsche offen! Seite 34 


WER - WAS - WO 


Unser Einkaufsführer zeigt Ihnen 
die Fachgeschäfte für Ihre Computer- 


wünsche Seite 35 


Vokabeltrainer 


Sind Sie Schüler oder Student? 

Oder möchten Sie die Kenntnisse 
einer Fremdsprache verbessern? 
Hier hilft der. Vokabeltrainer EEE 
Ihnen weiter. 





Seite 50 


ie schnell Kontakt auf. 

et können, oder eine Klein- 

ige schalten, unsere Karten. 

enken Sie daran! Für Abonnenten 
| Zeilen Text in einer Klein- 

e kostenlos! 





Seite 57 


Mensch ärgere Dich nicht! 

Das beliebte Brettspiel jetzt auch auf 
Ihrem Computer. Und das tolle ist, 
daß der Computer alle Mitspieler 


simulieren kann! Seite 59 
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4  GENIEDATA 


Co: 





ter 4200 


Nohlstr.29 - 4200 OBERHAUSEN 1 - Tel.0208/853997 


RAM 


EDI 
Bildschirm-orientierter Editor 


TFIX 24 


selbstdefinierte Abkürzungen 
SEDAS32 


SCRED!27 


REASS 3.2 


MAD 2.3 


TRANSC für Colour Genie 


TRANSV fürGlund!l 


wwy www WWWWVW 


CENTRONICS-INTERFACE 
für Typenrad-Schreibmaschinen 


Test-Programm, findet selbst hartnäckigste RAM-Fehler 


Erweiterte Tastatur-Routine incl. ED, standard- und 


Komfortabler Screen-Editor + Assembler 


Screen-Editor zur Textverarbeitung 


Reassembler, erzeugt Assembler-Quellfiles für SEDAS 


Komfortabler Monitor mit Line-Assembler, 
Disassembler, Cassetten-Routinen, Trace, etc. 


schreibt und liest Gl, Gil und TRS 80-Cass. 


schreibt Cassetten für Colour Genie 


INTERFACE FÜR GENIE Il zum Laden von 
Cassetten (TRS 80, Genie I u. Il) 


400 ,-- 
{mit Einbau) 


Cass. 59,-- 
Cass. 49 -- 


EPROM 125,-- 


Cass./Disk. 115,--/145,,-- 


Cass./Disk. 95,-/115,-- 


Cass./Disk. 85,--/105,-- 


Cass./Disk. 139,--/159,-- 


Cass. 39,-- 


Cass. 39,-- 


An Ar Mi Mn Mn Mi Mn Mn Mn Mn 


200,-- 


Weitere umfangreiche Softwareliste f. Colour Genie auf Anfrage gegen Rückporto DM 3,50 


GENIE 16 


Der erste 16 Bit Rechner von TCS setzt 
neue Maßstäbe. Das aus europäischer 
Fertigung stammende Genie 16 darf als 
kleine Sensation aufgefasst werden. Die- 
ser Rechner ist mit einem echten 16 Bit 
8086 Prozessor ausgestattet und ist 
trotzdem voll IBM PC kompatibel. 

Seine Grundkapazität beträgt bereits 
128 K und ist bis auf ca. 780 K ausbau- 
fähig. Es verfügt aufgrund des RGB An- 
schlusses und der 16 Farben mit zwei 











Helligkeitsstufen über eine exzellente 

Farbwiedergabe. Der ROM Bereich um- 

faßt 64 K. In voller Ausbaustufe sind 

zwei Disk Drives mit insgesamt 720 K 

eingebaut. Betriebssystem ist MS DOS. 
Das Genie 16 verfügt selbstverständ- 

lich über eine Vielzahl von Schnitt- 

stellen. 

— Video: RGB, BAS und HF 

— 8 Bit Centronics Parallel Drucker- 
schnittstelle 





— RS 232 Serielle Schnittstelle 


— Cassettenport 
— Lighrpen 
— Joystick 
— 4 IBM PC.kompatible Slots 
— 2 echte.16.Bit.Slots 
Bedingt durch .seine modulare Aufbau- 
weise 
— Grundeinheit mit Tastatur (incl. 
128 K RAM, 64 K ROM und Casset- 
tenschnittstelle) 
— zweite Einheit mit 2 Disk Drives incl, 
Controller IBM Slots und 16 Bit Slots 
kann der Einstieg zu einem 16 Bit Rech- 
ner schon auf einem sehr günstigen 
Preisniveau beginnen. Die Grundeinheit 
ist schon für ca. 2000,-- DM zu haben. 
Das komplette System bestehend aus 
beiden Einheiten und einem umfangrei- 
chen Softwarepaket (Word Star, Calc 
Star und Datenbanksystem) wird zu ei- 
nem Gesamtpreis von unter 6000,-- DM 
inclusive Mehrwertsteuer zu haben sein 
— eine Sensation, 
Alleinvertrieb in Deutschland: 
TCS Computer GmbH 
Kölnstr.2 -4 — 5205 St. Augustin 2 
Tel.:02241/28071 





RADIX- 10 
Schneller Matrixdrucker mit „Near Let- 
ter Quality”. 


Neue Matrixdrucker gibt es am lau- 
fenden Band. Die Entwicklung geht je- 
doch hauptsächlich in Richtung Druck- 
geschwindigkeit, wobei das Schriftbild 
nie mit Typenraddruckern wirklich kon- 
kur ieren konnte, 

Der Firma STAR ist es nun mit dem 
neuen RADIX-10 gelungen, eine echte 
Kombination zwischen Matrix- und Ty- 
penraddrucker zu erzielen. Mit der den 
neuen Matrixdruckern eigenen hohen 
Geschwindigkeit einerseits und einem 
Schriftbild {Near Letter Quality NLO} 
das fast von, .einem..Typenraddrucker 
stammen könnte, andererseits, ist der 
RADIX einer der. wenigen echten Neu- 
heiten auf dem: Druckermarkt. 

Auch seine übrigen Spezifikationen 
lassen keine Wünsche offen: 

— 200 Zeichen. pro Sekunde {im bidi- 
rektionalen Matrixbetrieb} 

—.16.K Pufferspeicher 

— 9x 9 Standardschrift : 

— 18'x'18:Near. Letter Quality {NLO) 

—. Friktion und Traktor Papiertransport 


..— automatische Einzelbiattzuführung 


— 6 verschiedene Schriftbreiten 

— eine grafische Auflösung von max. 
240 x 144 Punkten {!) 

— Centronics Parallel und RS 232 C 
Schnittstellen serienmäßig 
{umschaltbar) 

um nur einiges zu nennen. 

Der RADIX, als echte Alternative 
zur herkömmlichen Kombination von 
Typenrad und Matrixdrucker zeigt auf 
sehr eindrucksvolle Weise, daß sowohl 
ein exzellentes Schriftbild als auch eine 
hohe Geschwindigkeit in einem Gerät 
vereint werden kann. 

Der Preis wird DM 2500,-- nicht über- 

schreiten, 

Alleinvertrieb in Deutschland: 

TCS Computer GmbH 

Kölnstraße 2 - 4 — 5205 St. Augustin 2 

Tel.: 02241/28071 





RSIeEIDEer eUrIEINeESITIRIEDETAeTe 


;,Maschinenprogramms als "SYSTEM"-Programm auf Kassette 
sind damit möglich. 
"Viele weitere Befehle sind vorhanden (insges. über 20St.): 


© INKEY, wartet: aber. bis eine Taste gedrückt :wurde, . ?HEX. 
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KERFRRERHUNRKERRHRTTRHERTRNENR 


TriBat ein Programm für das Colour Genie mit 16K 

So etwas haben Sie auf dem Colour-Genie noch nicht ge- 
spielt! Ein Scramble-Spiel mit ungewöhnlicher Grafik ! 

Und wenn wir sagen, daß diese Grafik unerreicht gut ist, 
dann meinen wir das auch so. Sie düsen mit großer Ge- 
schwindigkeit über ein bergiges Gelände und müssen mit 
Laserstrahlen und Bomben angreifende Raketen sowie Benzin- 
tanks vernichten. Mit der Zeit schwirren zudem noch 
allerlei Gebilde und Meteore im Luftraum herum, denen es 
auszuweichen gilt. \ 39.-- DM 


Super Basic ein Programm für das Colour Genie 16/32 K 
Eine Basic - Erweiterung, die (fast) keine Wünsche mehr 
offenläßt. Mit GOTO oder GOSUB können Sie Labels ansprin- 
gen, z.B. - 10 LABEL "START" 


Programm 


80 IF „.. THEN GOTO"START" 


150 END 
Wenn Sie ein Programm mit (Break) oder STOP unterbrechen, 
oder falls es aufgrund eines Fehlers selbst irgendwo ab- 
bricht, dann können Sie sich mit ?VAR alle bisher im Pro- 
gramm benutzten Variablen und deren aktuelle Inhalte aus- 
geben lassen! 
Mit der FIND-Funktion können Sie beiebige Texte, Befehle, 
Worte oder Variablen im Programm suchen lassen, INSTR sucht 
eine Textvariable nach einer best. Zeichenfolge ab, mit 
DEF FN lassen sich Funktionen definieren; ein kleiner 
Maschinensprachemonitor ist direkt im Basic verfügbar: 
HEX/ACSII-Dump, EDIT-Memory, sowie Abspeichern eines 


"Peek:&:Poke jetzt mit Doppelbyte, &INKEY arbeitetiwie 


rechnet::DEZ:: in: HEX: um, .u.v.a.m. 
Das tollste: ist: jedoch; daß: dieses :Programm:nur cai.1,6K 
Speicherplatz belegt ,::Ihnen.:also noch: genug: Platz bleibt, 
um.die neuen Befehle in eigenen Programmen anzuwenden. 
Trotz allen ein Anaewahnl ich günstiger Preis: 


39,-Dm 
 COLOoUR- GENIE SOFTWARE 


SCH \ NIDTKE , 


Büro- und Personalcomputer un. 


Sardkenslstreße: 84. =Telefon: 0241-232 17 
5100 AACHEN 


Wir senden Ihnen gerne unseren Softwarekatalog mit über 100 Programmen! {Natürlich kostenlos!) 











MUSIK + COMPUTER 


Kreative Freizeit — problemloser Selbstbau 
| Eu faszinierende Möglichkeiten 


Durch die Kombination von Computer 
Ä Zr und ad — wie nur Wersi 
5 INIEIRABEE. p i als "Made in Germany” bietet — er- 
vn e öffnen sich dem Computer-Anwender 
ee 2 ! bislang ungeahnte, faszinierende Soft- 
ge us! ware-Bereiche. Der Musikfreund gewinnt 


INSTRUMENT - 


FOREN neue Dimensionen in Gestaltungsviel- 
MO Er 


Ze falt, Klangschöpfung, Komposition und 
Interpretation. 











FE Das Wersi-DMS-System "macht's mög- 
lich”. Durch Volldigital-Technik wird 
die Verbindung mit dem Computer 
möglich. Start frei für die Anwendungen 


der Zukunft. 


Das WERSI-KEYBOARD 
— der Schlüssel zu Ihrem Computer 


Sie besitzen einen Homecomputer oder ein anderes Klein- 
Rechnersystem ? Und schon lange haben Sie sich damit 
beschäftigt, nunmehr auch Musik mit Ihrem Computer zu 
machen ? Bislang stand Ihnen aber nur die normale Tastatur 
des Rechners zur Verfügung ? Dann haben wir jetzt die 
richtige Idee für Sie: Mit dem Wersi-Keyboard, damit das 
Musizieren auch so richtig Spaß macht ! 

Wir als Orgelhersteller wurden schon oft nach einer ent- 
sprechenden Tastatur befragt. Mit dem Wersi-Computer- 





Warm KEYBOARD als doaie 


Keyboard bieten wir Ihnen nun in eingm soliden, form- Erganzung für jeden Klomeomputor 
schön gestalteten Gehäuse ein 5-Oktaven-Manual mit 6? Ben eng : 
. . ne am a) 
Tasten — von C bis C — mit computergerechter 8 x 8 Brote 22cm en zu Torenauug Keyboard 
. Höhe 75cm — Programm zur Tastaturabfrage ınct. Anschlußkaboi 
Matrixabfrage an. Umfang IOMaven Gin - sofort einsatzbereit) 
en 


Auslosung Matnxabfra90 6x & 


Die ALPHA DX 300 — das Superding 7" si 
— das Orchester, das sich per Computer steuern läßt 


Mit der ALPHA DX 300 verfügen Sie über eines der außergewöhnlichsten Orchester für zuhause oder das Studio, ein Keyboard 
oder Synthesizer für die Bühne und viel&s andere mehr. Die Zukunft ist Wirklichkeit. . 

Die ALPHA DX 300 ist “lernfähig”, d. h. sie kann neue Programme, Klangfarben etc. jederzeit ändern, löschen oder auf- 
nehmen. Diese Dimension ist neu und vorteilhaft, wenn die ursprünglich 
einprogrammierten Instrumente vielleicht doch einmal in Vergessenheit 
geraten soliten. 

Die ALPHA DX 300 verfügt über die internationale Standard-Schnitt- 
stelle RS 232; hieran läßt sich ein “Apple”, ein "'Commodore”,: Sirius” 
oder andere Home- -Computer anschließen. Die Software für Ihren Com- 
puter schreiben Sie entweder selbst oder beziehen unsere Software- Pakete,” > 








für Ihren Rechner. Pr SE 
Der Anschluß des Home-Computers eröffnet Ihnen das breite Spek- PA N IN 
trum der Variationsmöglichkeiten, Ihrer ALPHA DX 300 FD So 
neue Soünds, neue Presets usw..'beizubringen‘'; Umge- :: LEE 5 
FE Se ES EEE 
kehrt läßt sich auf dem Home-Computer (falls dieser N x EN & 
dafür. technisch ausgelegt ist}:tabetlarisch S ESCHE er 
oder grafisch der ““Inhalt”‘.Ihrer. Orgel 1 SEHE SS s 
r i , z E SS S x > 
. E, abbilden z. B. die gespielten Noten ETF SS 
oder Registrierinhalte. X AR SE & N SF 
EEE N 
Wersi Orgel- und Piano-Bausätze L EE Q% N &e SO 
Bestellcoupon bitte einsenden an: Industriestraße 5401 Halsenbach f o a 


Telefon (08747) 7131 Pi 
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Für 
den 
Anfänger 


Die Fragen, die heute geklärt werden sollen, stam- 
men von Herrn Roland Wolten aus 2807 Achim. 

Bevor wir aber rangehen, möchte ich Sie noch- 
einmal bitten: 

Wenn Sie irgendwelche Fragen zu Ihrem Com- 
puter haben, schreiben Sie uns! Definieren Sie aber 
bitte so genau wie möglich Ihr Problem! 

Jetzt aber los: 

Die Befehle PEEK und POKE sind Befehle, mit de- 
nen es möglich ist, Speicherbereiche zu lesen. oder 
zu ändern. Fangen wir einmal mit PEEK. an: 

Mit PEEK ist es möglich, jeweils eine Speicher- 
stelle des gesamten Speicherbereiches Ihres: Com- 
puters auszulesen. Dazu schreiben Sie.die. Adresse 
der Speicherstelle, die Sie sich ansehen: wollen, 
hinter dem Wort PEEK in Klammern. Nehmen wir 
an, Sie wollen den Computer feststellen: lassen, wel- 
ches Zeichen sich in der oberen, linken: Ecke’ des 
Bildschirmes befindet. Die Adresse dieser. Speicher- 
stelle ist bei Colour Genie. Benutzern::17408: und 
bei. Genie-. oder TRS 80-Benutzern 15360. Tippen 
Sie also: 

PRINT: PEEK. (17408) und Return 
beim:.Colour:Genie,:.oder.: :.: 

PRINT PEEK (15360) und Return 
beim. Genie. Der Computer: gibt. Ihnen. daraufhin 
eine Zahl. Diese Zahl suchen Sie in.der ASCII- 
CODE-Tabelle in. der Bedienungsanleitung, und 
schon ‘wissen Sie, welcher Buchstabe dort steht. 
Wenn Sie jetzt einwenden, daß dieses Vorgehen ja 
ziemlich umständlich ist, weil Sie ja nur auf den 
Bildschirm zu schauen brauchen, um festzustellen, 
was da steht, dann haben Sie natürlich recht. Aber 
halten Sie sich bitte vor Augen, daß dieses Bei- 
spiel Ihnen ja nur die Arbeitsweise von PEEK ver- 
deutlichen soll, dann ändert sich Ihre Ansicht 
warscheinlich. 

POKE ist ein umgedrehter PEEK-Befehl. Mit 
POKE können Sie in eine beliebige Speicherstelle 
einen Wert zwischen ® und 255 schreiben. Dazu 
wieder ein Beispiel: 

POKE 17408,65 und Return 
für Colour Genie und 

POKE 15360,65 und Return 
für Genie-Computer. Was passiert? In der oberen 
linken Bildschirmecke erscheint ein A. Warum? 
Weil wir in die Adresse des Bildschirmspeichers, 
oben, inks, den ASCII-Wert von A (=65)} geschrie- 
ben haben. 

Jetzt machen wir es aber etwas spannender: 


GENIEDATA 7 


ec Computer Studio GmbH 
Elisabethstraße 5 
4600 Dortmund 1 
Tel.: 0231- 528184 
Tx 822 631 cccsd 
COMPUTERSYSTEME 
GENIEIH 
64 KB: RAM, 2x720 KB Disk-Speicher, 
Bildschirm 64x 16 oder 80x24 Zeichen. TRS-80? 
Mod. 1 kompatibel 
CP/M* fähig 6900 ,- 
GENIE I 
64 KB RAM, Microsoft-BASIC, Bildschirm 64x 16 
Zeichen, Level IV ROM, TRS-80* Mod. 1 
kompatibel 998,-- 
NEU: TANDY MODELL 100 der tragbare ab 1490,-- 
COLOUR GENIE Er 
Neueste Version mit Meßinstrument| 
16KB RAM, Microsoft-BASIC & Grafik, 16 Farben 
auf Ihrem Farbfernseher, TRS-80°? Mod. 1 
BASIC kompatibel 598,-- 
dto. mit 32 KB RAM 670,- 
®TRS-80 ist eingetragenes Warenzeichen der Tandy 
Corp, »CP/M ist eingetragenes Warenzeichen von Digital 
Researcn. 


Slim Line Laufwerk, 40 Track, SS/DD, 


250 K-Byte Speicherkapazität 625,-- 
Stim Line Laufwerk, Doppelfloppy, kompl. 

mit Gehäuse, Netzteil u. Kabel 1499, - 
Andere Laufwerke und Kapazitäten auf Anfrage lieferbar. 
TELEFONMODEM Acoustic Coupler AC-3 
mit FTZ-Nr. 18.13.1801.00 

Brother HR 15 Typenraddrucker der ideale 
Schönschreibdrucker mit den vielen Kombi- 
nationsmöglichkeiten 

Katalog u. Testbericht kostenlos 1795,-- 
Expansion Interface für. TRS-80° incl. 332 K RAM 925,-- 
Double Density Controller für Tandy und 

Video Genie 198,-- 
16 K Erweiterung für Colour Genie incl. Einbau 79,- 
Star Drucker Gemini-10X,:120.2/sec, 

1920 Pkt. pro Zeile 998,-- 
Zenith Monitor grün o. bernstein entspiegelt 319,- 


Datenrecorder 6019 (bitte Da anfordern) 149,- 


nur 348,-- 


ELTERN 


BASF Disketten;.Qualimetrik, 10 Stück 49,- 
Verbatim Disketten mit'Verstärkungsring 


10 Stück,.DD;.mitorig:: Reinig. Set 79,- 
Farbig sortierte. Diskettenboxen 750 
Datencassette C 20°. 3.30 
Farbbänder:für: 

Tandy:Eine: Printer I, Eu. IV je 15,- 


Tandy:Line.Printer Iilu,V je 19,50 
Tandy.DW Il je 17 ,- 
Epson MX 80 je 19,- 
Itoh 8510, 1550 je 20,-. 
Oki Microline, Star je 9,50 
Rest auf Anfrage. 


Alle hier angebotenen Produkte sind ab Lager lieferbar. 
Alle Preise incl, Mehrwertsteuer. 


NEU: 28 Seiten Colour Genie Softwareliste 
kostenlos anfordern! 
Wir suchen ständig neue Programme für Colour Genie! 
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Sie wissen, daß man mit VARPTR 
feststellen kann, an welcher 
Adresse im Speicher der Wert ei- 
ner Variabien abgelegt ist. Gut, 
dann wollen wir einmal den Wert 
einer Variablen durch POKE än- 
dern. Geben Sie einmal folgendes 
Programm ein: 
10 DEFINTA 
20A=10 
30 ADRESSE = VARPTR (A) 
40 PRINTA 
50 POKE ADRESSE ,50 
60 PRINT A 
Die Erklärung: 
In Zeile 10 legen wir fest, daß A 
in Zukunft als Integervariable zu 
behandeln ist. Zeile 20 weist der 
Variablen A den Wert 10 zu. Dann 
stellen wir in Zeile 30 fest, in wel- 
cher Speicherstelle der Wert für 
A gespeichert ist. In Zeile 40 las- 
sen wir den Wert von A (=10) auf 
den Bildschirm schreiben. Die 
nächste Zeile ändert nun durch 
POKE den Wert der Variablen A. 
Und in der letzten Zeile lassen wir 
A noch einmal ausgeben, und sie- 
he da, der Wert ist jetzt 50. 
Zur nächsten Frage: 
Um Basic Programme vom Genie 
auf das Colour Genie zu übertra- 
gen (oder umgekehrt) ist es nötig, 
eine Gegenüberstellung der ver- 
schiedenen Anweisungen zu haben. 
Diese Referenz-Tabelle bringen 
wir in der nächsten GENIE DATA. 
Eine Erklärung der logischen 
Funktionen wollen wir hier nicht 
geben, da das zu umfangreich wür- 
de, Dieses werden Sie aber zum 
Beispiel in unserem Colour Genie 
Buch finden, das demnächst er- 
scheint. Diese Erklärung findet 
man aber normalerweise auch in 
jedem Buch, das sich mit Maschi- 
nensprache befasst. 

Zum Schluß gibt uns Herr Wol- 
ten auch noch folgende Tips: 
Er hat entdeckt, daß nach IF das 
THEN entfallen kann, wenn .da- 
durch keine Irrtümer entstehen: 
Das ist richtig, und falis doch Irr- 
tümer entstehen, kann man THEN 
durch ein Komma ersetzen. 
REM kann durch ' (Shift 7) er- 
setzt werden. 
So, das wars für heute. 
Und falls auch Sie fragen haben, 
dann schreiben Sie uns. 


H.-J. Winterscheid 





Wenn man zum Colour Genie nur 
einen Fernseher als Bildschirm be- 
sitzt, wird man sich oft genug da- 
rüber ärgern, daß bei korrekt ein- 
gestelltem Bild trotzdem stören- 
de Nebengeräusche aus dem Fern- 
sehlautsprecher ertönen. 

Meistens ist das ein mehr oder 
weniger starkes Rauschen, daß die 
Musik oder die Explosionen bei ei- 
nem Spiel begleitet. 

Um diesem Mißstand abhilfe zu 
schaffen, habe ich einen Klein- 
leistungsverstärker in eine kleine 
Lautsprecherbox eingebaut und 
habe nun zu einem perfekten Bild 
auch einen sauberen Klang! 

Der Lautsprecher wird bei mir 
mit einer 9 Volt Batterie betrie- 
ben und arbeitet mit ihr nun 
schon ein halbes Jahr zufrieden- 
steilend. 

Und die Vorteile des Ganzen: 
Einfach in die Audio-Buchse des 
Colour Genie einstecken, keine 
Eingriffe in den Computer, ein- 
fach zu transportieren. 

Man kann statt des Lautsprech- 
ers auch einen der modernen 32 
Ohm Kleinkopfhörer anschliessen 
und stört somit nie mehr seine 
Familie, wenn man gerade durch 
den Weltraum fliegt. 

Und noch etwas: 

Diese kleinen Verstärker sind in 
jedem Elektronikladen billig zu 
bekommen und meistens alle nach 
dem selben System aufgebaut, 
sodaß man dabei allenfalls meine 
Bauanleitung zum Anschluß an 
den Computer verwenden kann. 

Gesamt gesehen ist der Einbau 
des Verstärkers in das Computer- 
gehäuse zwar möglich aber nicht 
unbedingt empfehlenswert. 

Der Platzmangel im Gehäuse, 
die Wärmeentwicklung des Ver- 
stärkers, der begrenzte Laut- 
sprecherdurchmesser und "der 


Klang im’ Gehäuse sprechen dage- 


gen. Besser ist es, den Verstär- 
ker in eine eigene Lautsprecher- 
box von ca. 1bcm mal 25cm ein- 
zubauen. Dabei können +12 Volt 


Sound total 


und Masse vom Paralielport und 
der Ton vom Audio-Ausgang des 
Colour Genie abgegriffen werden 
{über Anschlußkabel). 

Übrigens noch ein Tip: Die 
Steckerleiste für den Parallelport 
lässt sich einfach durch Halbie- 
ren einer AO-poligen IC Fassung 
herstellen. 

Eine Batterie von 9 Volt ist 
für den Verstärker vollkommen 
ausreichend. Sie muß allerdings 
durch einen Schalter abzuschal- 
ten sein. Mit einem Trimmpoti 
von 22k Ohm |Iinear, zwischen 
Eingang und Masse, kann man die 
Lautstärkeregelung noch etwas an- 
passen. 

Die einseitig kupferkaschierte 
Pertinaxplatine kann im üblichen. 
Piatinenherstellungsverfahren (be- 
lichtet oder gezeichnet) geätzt 
werden. 

Das Lautstärkeregelpotentiome- 
ter (47k Ohm) kann seitlich oder 
an der Vorderseite in das Compu- 
tergehäuse eingebaut werden, was 
aus nachstehenden Gründen je- 
doch nicht empfehlenswert ist. 
Es ist. erforderlich für das Poti 
ein Loch von ca. 6mm in das Ge- 
häuse zu bohren. Der spätere 
Sitz des Potis muß schon vor dem 
Einbau kontrolliert werden, ob 
nicht beim zusammenschrauben 
des Computers Berührungen zum 
Gehäuse oder der Platine entste- 
hen! 

Die Stromversorgung von + 12° 
Volt kann an der linken Seite der 
Computerpiatine von dem. 3-poli- 
gen Stecker des. Netzteils abge- 
griffen werden. ‚Die. Masse liegt 
an mehreren :Punkten..an, z. B. 
an der Tastatur. Der. NF-Eingang 
{Ton} des: 5W.Verstärkers wird 
am Mittelpunktleiter des Ausgangs 
„AUDIO” des Colour Genie ange- 
lötet.. Der andere Punkt des NF- 
Eingangs (zum 300k Widerstand) 
wird an der Abschirmung dieser 
Buchse angelötet. Als Lautsprech- 
er kann ein Kleinlautsprecher von 
max. DW Leistung eingebaut wer- 








den. Dieser ıst allerdings durch 
denvorgesehenen Plat> ım Com- 
puterdeckel auf 6 bis 7cm Durch- 
messer begrenzt. 


Stückliste: 
Pertinaxplatıne ainseıuıg kupfer- 
kaschiert 
Regelpoti 47k log. mit Knopf 
Trimmpoti 22k Ihn 
iC TBA 800 
Lautsprecher {nach Bauaniei- 
tung), 8 Ohm \ 

1 2200 uF Eiko 
2 100 uF Eikos 
147 uF Elko 
1470 uF Eiko 
1 33 p Kondensator 
1 

1 

1 

1 

1 

1 


jur 


JE ERERN ERDE EEE 


3,3n Kondensator 

300 k Widerstand 

180 Widerstand 

Batterieklips (9\V) 

Meter Lautsprecherkabel 
Kunststoff- oder Holzgehäuse 


Platinenlayout 
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KLEINANZEIGEN 


COLOUR GENIE 
Programm + Erfahrungsaus- 
tausch, Jörg Bemm6, Markt- 
str. 25, 2216 Schenefeld 


Suche Floppy + Exp. f. TRS 
80 W. Nimzik Himmelgei- 
ster 19 4047 Dormagen Tel. 
72394 


Suche Kontaktadresse V.G. 
Gebraucher Kreis Heinsberg. 
G:'.Peters P. Polliusstr. 51, 
6045: BW: Roermond-NL 


Tastatur. mit ; integriertem 
Zehnerblöck: und’ div. Son- 
dertasten:95;-:DM: W.: Hage- 
now Tel. 04921/51065 


PROG.: ‚TAUSCH, .. VG. .1, 
DISK; K.:::: WAGNER, 
DIETR.-BONH.STR: 1, 
6720 SPEYER 


Anadex' 40 Zeichen Druk- 
ker. Seriell und Parallel mit 
Handbuch, Schaltplänen u. 
div. Papier 300,- DM W. Ha- 
genow Tel. 04921/51065 


CG: MC-Assembier 30,- MC- 
Disass. 20,- DM (Cass.} H. 
Kristen, Haunspergerstr. 11; 
8229 Laufen 


Suche Hex-Listing bzw Sy- 
stem-Tape vom VG IH Ep- 
rom. Tausche auch Program- 
me. Michael Laschek, An 
der Sommerseite 33, 6430 
Bad Hersfeld 


Colour Genie 32K: COL- 
OUR-ENGLISCH 2500 Vo- 
kabeln, 5 Aufnahmen je 25 
KB auf Kassette 39,- DM 

COLOUR-LEHRER, univer- 
seiles Abfrageprogramm, 
25,- DM. INFO kostenlos 
Kowalewski, Reinickendor- 
ferstr. 42), 2 Hamburg 73 


Suche billigen STAR-Druk- 
ker und Anschluß an Co- 
lour Genie, H, Gramil, Siegl- 
berg 78 1/2, 8390 Passau 


CG-Soft Info 80 Pf 
Manfred Maiers Am Hang I 
2352 Bordesholm 


Die Se KUNDENDIENST- INFORMATION 


NACHRICHTE 








bei Ihrem Händler zu haben! 


oder anfordern bei 


HEEL-VERLAG 
Postfach 320220 


5300 BONN 3 


Name:...... 


BESTELL-COUPON 
: Bitte, senden Sie mir kostenlos die neueste Ausgabe 
dee GENIE-NACHRICHTEN 


BEoeTeennreE Heer ne netten hun Kunssareaeeer 
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COLOUR GENIE HARDWARE 


Automatische Cassettenrecordersteuerung 


mit Einbauanleitung 


Colour Genie Joy Stick 


DM 24,80 
DM 79,80 


für Spiele, die sonst mit der Tastatur 


gespleit werden 


SOFTWARE-KATALOG 
ANFORDERN! 


Versand: Entweder per Nachnahme odar per Vorkasse 


auf unser Konto 66811 bel der Stadtsparkasse Osnabrück 
{Bi.Z 26550001} 3 
Bei Bestellungen ab DM 50,-- Porto und Verpackung frei. 


Datenrecorder-Probleme ? 
Muß nicht sein! 


Mit unserer Zusatzplatine werden die Daten digitalisiert. 
- In jedem normalen Recorder einzuschleifen ! 


Mit Einbaupian Modul DM 98,- 


Für die Alten’ 

Levelmeter Nachrüstsatz kompl. mit Einbau- 
anleitung 

Commodore VC 20 + VC 64 


Cassetteninterface Vers. 1 mit Schaltern mit Bedienungs- 
anleitung (wird nur auf den Port gesteckt}. 


Für alle handelsüblichen Recorder 

dito Vers. 2 

mit automatischer Motorsteuerung für den Recorder. 
Mit Bedienungsanleitung 

Light Pen für C 64 in Vorbereitung ... 
NDR-Computer-Bausätze bei uns! 


DM 19,80 


DM 29,80 


DM. 36,80 


KLEIN 


ERENERIREINLENZESSEENE 


Colour Genie 32K Software, 


Progr. Ihre EPROMs 2716,- 





Suehe:CPU- und: Videopla- Colour Genie: Full-Screen- 


Joyst, Bücher VB 700,- -32, 2532 mit Colour Genie tine für Genie I. Angebote Editor, EACA-komp. Joy- 
0551/77887 Programmen (auf Tape/Disk} bitte unter 07321/41357 ab es: I Ne 2 
CG-P a W. Krenn, St Wolfgangsp!.11 18.30 « wNess, duningkit, 
a OL ar oleueh 8000 München 80, Tel. 089/ Wir führen: Sonderzeichen uva. Info 50 


4138315 ab 18.00 


Pf - H. Czech, Kölner 6, 


bengebirgsstr. ; 39... 5300 Genie I, Il, 16 A+B, Color 509 Lev-3 
Bonn 3 er Er Bene EINE AUFSRE ee Suche Geschäft B 
c T PER 0 + 1 OM + tar rucker ucne eschä sprogr. z, . 
s an Ds: Cass. Inter. 12000 Baud Farb und monochrom Moni- Lohnbuchh., Lagerverw., 
ee Kämpfel. : Tel. : 06825 43266 tore zu unglaublichen Prei- Kalkulation usw. für CG. 
er u en! Preisliste anfordern Tel. 0228/224353 

me a . . ei. Suche dringend deutsche 
Genie-Club Raum Augsburg Suche für Colour Genie Computerversand Jourdan Anleitungen zu: Superutili- 


Info q. Rückp. K. v. Mau- 
beuge Bergstr. 84 8901 
Aystetten 


Schwierigkeiten Cassetten- 
progr. auf Disk zu bekom- 
men!? HELP/CMD für nur 
30,- und der Spass kann los- 


0511 872307: 


: Software. zum Programmie- 
ren der seriellen. Schnittstel- 
le' (Modem/300' Baud} Tel. 


€. G. Programmtausch auf 
Floppy H.: Schmid; Teckstr.:: 
40, 7410 Reutlingen: 17 


Darmstädter Str. 66 
6080 Groß-Gerau 


: HIRES-Programme für. HR 
61. Walkowiak, Zechenbahn 
13.435 Recklinghausen 


Tausche‘ VG.-Programme 
(300) Iris Otten, Hermann- 


ty plus 3.0, Dotprint, Geap 
{TRS 80 M1, Itoh 8510 vor- 
handen} H.-Fischer Akazien- 
weg 1:6698 Namborn 5 


Suche : Schaltpt. f. C. G. 
Joyst. iu: An/Dg-Wandler J. 
Aichele. Jusistr.3 7302 Ost- 


en 07321-41357 ab Am dem; Geber e Ost-Str. 16 5000 Köln 80 ..fild.-2 
. nie ard- un oftware FR ' 
u gebr. Expander u. en Ai L. nr ee ee 
rucker auch def. für VG-1, trandlaan 51, B- oK- ; i 
06343/1416 syde, Belgien Christa Burmann, Karl-Ar- 


nold-Str ? 4630 Bochum 6 








COLOUR-GENIE 


SCHM 


electronic 
Büro- und Personalcomputer 


Sandkaulstraße 84. - Telefon: 0241-232 17 
5100 AACHEN 


SOFTWARE 


)neu 


AKTUELL 
PREISWERT 


Wir senden Ihnen gerne unseren Softwarekatalog mit über 100 Programmen! (Natürlich kostenlos!} 


COLOUR PASCAL a 


Ein Komplettes Programmsystem, um schnell und einfach die Pro- 
grammiersprache PASCAL zu erlernen; bestehend aus Bildschirm- 
editor (!), Compiler, Steuerprogramm. Sie können die mit dem 
Bildschirmeditor erstellten Programme direkt compilieren, 
überprüfen, wieder editieren, etc. Eine ausführliche Anleitung 
mit Hinweisen zur strukturierten Pascalprogrammierung und 
Syrtaxdiagrammen liegt bei. (natürlich in DEUTSCH) 

Quellcode und erzeugte Programme lassen sich sowohl auf Disk 
als auch auf Kassette abspeichern bzw. laden. 

(St. Klus) Art. 877 SeS 59.- M 


DATABASE 


Damit wırd Ihr Computer zur Adresskartei. Sie können damit 
Namen, Adressen, Tel. Nummern, Bemerkungen u.a. abspeichern, 
nach verschiedenen Gesichtspunkten sortieren, suchen, aus- 
drucken, etc. ... 
Durch Verändern von DATA-Zeilen können Sie anstelle von 
Adressen auch andere Dateien mit anderen Bezeichnungen anlegen. 
übrigens: die Daten, die Sie im Programm eingeben, werden 

nicht in DATA Zeilen abgelegt, sondern direkt auf 
Kassette abgespeichert. Sie können smit auch sehr einfach 
verschiedene Dateien miteinander verbinden. Dieses Programm 
wurde für Kassettenbenutzer geschrieben und speichert die Daten 
in einem besonders zeitsparenden Verfahren auf Kassette ab. 

Art. 897 SeS 25.- Di 


PLOTT 84 


Dieses Programm plottet beliebige Funktionen auf den Bitd- 
schirm, jedoch mit einer Auflösung von ca. 188x388 Punkten. 
Die Funktion wird In der Form 

Yiid=sFix) = 2.B. Yli) = SINE SORCXI + COS(Xt3) ) 
eingegeben und dann in einem Koordinatenraster angezeigt, aus 
dem. sich-auch einzelne Werte recht genau ablesen lassen. 
Sitte. lassen Sie sich durch den enorm günstigen Preis nicht 
über-die:Leistungsfähigkeit des Programms täuschen. 

ans Art. 893 Ses 25.- bM 


5 
FÜER AENDERLUN 


SUPER EDIT 


Ein echter Bıldschirm - Editor für Ihr Colour Genie. 

Sie wandern mit dem Cursor über den Bildschirm und verändern so 
in recht einfacher Weise Ihr Programn. Sie können Ihr Progr amm 
Zeilenweise vor- oder auch rückwärts scrollen. überschreiben 
und Verdoppeln von Zeilennummern ist ab sofort kein Problem 
mehr. Aber das tst noch nicht alles: Zusatzfunktionen erlauben 
Ihnen das Zusammenhängen von Programmen (MERGE-Befehl), Zeilen 
Können aufgetrennt werden, verschiedene Zeilen Können zu einer 
zusammengefasst werden, u.a. 


MONITOR 1.2 


eın einfacher Maschinensprachemonitor mit HEX und ASCII - Dump, 
Edit-Funktion, Laden und Abspeichern von Maschinenprogrammen, 
HEX-DEZ Umwandlungs- und Rechenroutine, etc. 


Art. 999 39.- DM 
COLOUR - FORTH 


Eine neue Programmiersprache für Ihr Colour Genie. 

Falls Sie FORTH Kennen, ist alles klar, falls nicht, bitten wir 
Sie, sich danach zu erkundigen. FORTH hier zu erklären, würde 
den Ramen dieser Softwareliste sprengen. Im Lieferumfang Ist 
ein Anleitungsbuch, das auch FÜRTH - Neulingen die Sprache 
erklärt und In die Benutzung einweist. 


Art. 898 95. DM 


Art. 894 SeS 39.- DM 
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Nach dem Abtippen steigen Sie 48006 CE 28) 4E 00 00 00 00 00 00 00 00 
einfach ein, und los geht die rasan- 480B 00 00 00 DO O0 00 O0 OO O0 DO 00 
te Fahrt. Doch was ist das? ?!! a81is 00 00 00 00 00 00 00 ZE ZEE ZE ZE 
Statt auf einer Rennstrecke fahren 4821. :ZE 2E. ZE2E 2E7SE. 2ZE.2E2E 2E.00 
Sie versehentlich auf der fal- 482C FE EO0 20 06 DS CD E35 00 DI C9 ES 
schen Spur einer „idyllischen” 4857 DS FI 2a 20 40 11 00 44 CD 90 10 
Landstraße, vorbei an Häusern 4842 73004 Fi Di Ei CP 11 00 48 CD 90 
und Bäumen —- und ... — es kom- 4840 ic Z0 Fa FL 77 23 22 20 40 DE 11 
men Ihnen höllisch viele Fahrzeu- 4858 00 AC 19 ZA ZE 40 ES EI 69 75 il 
ge entgegen. Diesen gilt es durch  ABRE GO O0 SF 19 FE EL.77:DL Ei CP EF 
geschickte Manöver auszuweichen. 484E FS 7E ZE A7 28 05:.C0D.20:48 18 F& 
Versuchen Sie es einfach! Wer es 4877 Fi ES C9 AF ARMEE TENTSE 7F 7F 72 
am längsten durchhält bekommt 4884 F8 F8 CO CE. CEFEXFE.CE 07 08 06 
die meisten Punkte! a88F 06 07 FE FIFRÖEROAO 0 40 EO CF 
Der Spielablauf 489A CF FF FF FEFIOFOF 7F 7F 7F FF 
In der unteren Bildschirmzeile 4BAS CF ER:COMFOEIRERFE FE SF O7F FF EO 
wird laufend der Spielstand ange- 4860 EG EO:FOHFE:FOCHFE FF 07 07 07 OF 
zeigt. Mit jeweils sechs program- 48BB FF CFCESERCE CF FF FO EO FR FZ 
mierten Zeichen werden die ver- 4806 FEFHIFR:FFROF 07 EO FF FF FF 7 
schiedenfarbigen Hinderniswagen 48D1 7FIRFE"AE 07 FF FF FF FE FE FC Fe 
und der orangefarbige Rennwagen 48DC OE 08.08 04 OR 03 ID Ol 1E 00 38 
dargestellt. Für jeden Hindernis- 4g3E7 18 O8 OC 08 70 OE OC 37 Fi A4F 14 
wagen, der den Bildschirm passiert a48F2 07 04 TE 21 11 09 09 FB 86 68 ÖC 
hat, bekommen Sie 1 - 5 Punkte, A8FD 42 41 FF 19 29 45 85 19 E4 82 FR 
das ist abhängig von der Geschwin- 4908 A7 90 C8 55 OD 02 01 03 03 03 OF 
digkeit, mit der Sie fahren. Diese 4713 1F BO BO 80 80 BO LO Eu Fo OF 10 
steigert sich laufend, paraleli dazu aAFiE ZOO AF 89 89 SF FF FO FSB 7C ZE AF 
verengt sich die Straße. Um die 4729 OF OF FF BO 87 84 84 9& 84 B4 FF 
Reaktionszeit zu verkürzen, nähert 4934 09 C9 47 49 49 AAN AC FB FS SE 09 
sich Ihr Rennwagen ausserdem 493F DE F8 IE OA DE FI EE DA DS FR FE 
dem oberen Bildschirmrand. 494Ah OA DEF? Fi C9 TE 09 DI FSB ZE 00 
Wem das noch nicht genug ist, 4955 3 F9 ZE OA DE FO SE O0 DE FI CY 
der kann mit SPACE die Beschleu- 4960 Zi FFFF EZE 18 48 AFFE 17 48 CD 
nigung verzehnfachen. Wenn man. 4968 AF AD 2A AS 48 ED SB 03 AB 57 19 
drei Unfälle verursacht hat, ist das 4976 ZE EO AO 11 28 00 ER CD AR 4R 19 
Spiel zuende, bei einer neuen 4781 CD 4R 4B 19 CD 4B AB FS IE 04 32 


Höchstpunktzahl kann man gege- 49S5C 23 40 FL ZA 20 40 CD AD 48 80 81 
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benenfalls noch seinen Namen 4997 00 19 22 20 40 CD «D AB SE BE 00 
eingeben. a9A2 19 22 20 40 CD &D 48 84 85 00 19 
Versuchen Sie, möglichst lange 49AD 22 20 40 CD AD 4 20 Zu om Fa 17 
in der Mitte der Straße zu bleiben. 49E3 48 87. C8 C1 ZA 1A 48 ED IE 1A 48 
So können Sie immer den Hinder- 4903 FS DS CD.65 40 DI za ıB Au ma 20 
nisfahrzeugen ausweichen. 49CE 40 ES IE: 06 DI FB ZE IF DE F9 TE 
Mit Hilfe des Soundgenerators 409 07 DE: FR.SE 07 DE F9 ZE OR DE FE 
wird während der Fahrt das Mo- A9E4 SE 10 DE:F$ SE 09 DE FB IE 10 DE 
torgeräusch simuliert. Wenn Sie zu ASERF FF ZE0&: DE FR SE 10 DE FP SE OB 
knapp an den Strafsenrand oder an A9FA DS FB.SE FF DE FF SE 0C DE F8 TE 
den Hinderniswagen fahren, ertönt anoS 64 DE. E9:SE: OD DS FB 3E 00 DE F9 
zur Warnung ein schleifendes Ge- 4A1IO O1 DO 07:CD:87 4E E& OF IR ZT 40 
räusch, das den Spielablauf.jedoch 4a1B EL 22 20:40 E5 CD AD 48 SC An oo 
nicht beeinträchtigt. Erst bei ei- 4A2& 19 22 20: 40ICD &D 48 BE SF 00 OD 
nem wirklichen Zusammenprall 4a:ı ZOO EO OEFR1i0 DO Ei FI A7 CH 47 
verlieren Sie durch eine Explosion ABSC 51 CD.45-ACHED SB 11 48 DA 15 48 
einen Ihrer Rennwagen. 4A47 CD 90 10 DA.DS AA FI SE 04 En 28 
Die beim Spielen und Program- aaAs2 40 Fi 21 759:49.22 20 40 CD &D 48 
mieren häufig benutzten Pfeilta- 4AS5D Zu 2A ZA Am ZA Ba ZA 2a Ba BA EA 
sten werden bei diesem Spiel 4N&8 ZA 20 00 21:9D:45 ZE 20 40 CD &D 
durch die Verwendung der 4723 489 2A ZO Bon RO, RD 20 RO PO Zu 20 
Größer- und Kleiner-Tasten entla- AATE 20 20 2A 00:21:65 45 22 20 40 CD 
stet. AABF 6D 49 2A 20.47.41 4D 45 RO 4F 56 
Programmdaten 4A94 45 52 20 24:00:21, ED 45 22 20 40 
Das Programm beiegt den vom Ba- ARSF CD &D 48 2a. 20.20.20 Ac au 20 20 
sic nicht unbedingt benutzten Gra- anAA 20 20 20 20: 2:00.21 15 46 22 20 
fikspeicher von Adresse 4800H 4ABS 40 CD AD 48 ZO.2A. DA DA DA Da aA 
bis 5282H. Das entspricht einer ıACO ZA ZA ER AR.EAEED: 00 01 00 00 CD 
Länge von 2690 Bytes. Die An- 4ACH 60 00 CD 40. QM ED 60 00 CD “u au 
sprungadresse ist 4E28H. 4AD& CI IC 4E ED:53:17:.48 FS SE OA 2 
4AElL 23 40 Fi 2. A422 DO A0 CD 4D 

ANEC 48 20 20 20:20:59. 4F 55 20 48 41 

AAF7 56 45 20 a2: SA: 4m 45 4E 20 54 

4B0O2 48 45 20 48:,49..47:48 20 SI 43 4F 
450D 52 45 1E on: LEL.OD. 00 21 BB 45 ZU 

E18 20 40 CD &D:42:.1E: 50 ACT 45 41 53 
4023 45 20 54 45.4040 20 4D 45 20 59 

4B2E AF 55 SE 20.4E:41:4D 45 20 00 2 
4E39 1D 49 06 OE.CH:DP. 05 278 DE 16 O0 

4E44 58 19 35 0003.50. 4E ES DS CD 57 
4B4F  4R Di EI 09.3585 BE DO IC 49 25 

AESA BE 20 08 SE: FF.Z2 17 48 CD 7E 4B 
4565 23 3E 85 BE>ZO 08 IE FF IS 1748 

4870 CD 7B 4E:2%.2E:85 BE DE TC 49 C9 
4B7E ED 5B 18.48: CD.90 IC Do 22 18 48 

4ES& C9 D9 ER:44:7D AB 67 78 AA CR 11 

ABF1 1F CR 1M.AR09-09 ES 2A Z0 a0 ii 

4B9C 28 OO: CD:&D:- 48 20 20 00 19 22 20 
4BA7 40 CD: 6D: AB: Ba 97 00 19 22 20 40 

4BE2 CD 4D:48:88.89 00 19 22 20 40 CD 

4ERD AD. A4RBABR O0 Ei C9 21 00 44 oil 

4EC8 00:04:TE- 90 ED Bi 11 78 44 CD 90 

4EDE 10-38 OF: 21 00 44 01 00 04 TE 94 

4EDE ED Bi:-CD 90 iC 20 O8 AF C9 CD 87 

4BE9 AB ES 07 20 F7 2A OF 48 11 00 44 

4BF4 ED S2 2D ED CD 87 4R ED 50 FA C9 
ABFF CD D4 4B CR 26 44 HF RD DE 20 40 

4COA CD 87 4B E& 05 FE 02 78 22 FS IE 
4615 01 32 23 40 Fi CD 6D 48 90 91 ou 

Aac2O 11 28 00 19 22 20 40 FS SE 09 72 
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EEE FE reTOr rem AST Em meer CET SOFAS JoSgSPsCJS50R IS FACES TuS EEE re EEE. 


ACZR 
4036 
4041 
4C4G 
A057 
4C62 
AnhD 
4.0278 
40283 
4CSE 
40.97 
AChAA 
ACArF 
KCBA 
ACCH 
4ACDO 
ACDB 
ACE& 
Aacrı 
ACFC 
4D47 
4Diz 
4D1D 
4028 
4033 
ADZE 
4D49 
4D54 
ADSF 
ADEA 
4D75 
4DBO 
4+D8aE 
4D9& 
ADAil 
ADAC 
4DE7 
ADER 
ADED 
4DD8 
4DE3 
ADEE 
4DF9 
4204 
4EöF 
4E1A 
4E2S 
4E30 
4E53B 
4E4& 
4ES1 
4ESCG 
A4E&7 
4E7?2 
4E7D 
4E88 
4E93 
4EFE 
4EA9 
4ERA 





OD 


20 
ZO 
GC 
Da 
FÜ 
00 
22 
=O 
Oo 
ar 


Zn 


07 


20 


0& 
CD 


28 


72 


AU 


74 
So 
tk 
OE 
SE 


OR: 


48 


Och 


KT-) 
oc 


ki 
we. 


ao 
00 
ED 
Er 
ar 
40 
en 
45 
48 
ZA 
20 
03 
48 
CD 


15 4 


oo 
22 
20 
D& 
OE 
7F 
ED 
CB 
O3 
19 
48 
&E 
38 


c9 
CD 
&D 
OF 
22 
FS 
20 
SA 
20 
1A 


20 


Fi 
ER 


20 
40 
aD 
DS 
28 
SE 


aD 


7 
Dr 


ci 


nn 
Da 


DE 
44 


ca 
CA 
20 
SB 
EA 
20 


.r 
DA 


EA 





FS 
&D 
au 
48 
20 
ZE 
Zu 
00 
20 
48 


zu 


09 
ac 


29 
40 
SE 
FB 


05 


2 


20 


: 44 


20 
EA 
44 
20 
ca 
44 
20 

















COLOUR-GENIE SOFTWARE 


SCHMIDTKE 


electronic 
Büro- und Personalcomputer 


Sandkaulstraße 84 - Telefon: 0241-232 17 
5100 AACHEN 


CALCUL 1.1 


Eın Mathematik - Programmpaket, das es in sich hat! 

Zum einen können Sie damit einen Taschenrechner simulieren, 
sowchl UPN als auch AOS. Die Anzeige gibt Jaufend Auskunft 
über die internen STACK-Register, I/O-Werte etc. ... 
Desweiteren lassen sich damit Funktionen mathematisch 
bearbeiten (integrieren, differenzieren, etc.). Die Funktion 
wird in hoher Auflösung auf den Bildschirm geplottet und kann 
als Dump auf einem Drucker (Typ Star oder Epson) ausgegeben 
werden. Art, 895 Se$ 47.- 


Kurzfassung der CALCUL-Befehle 


Ankurzungen: FL, FR, FO, Pl: Pieil nsch Links, rauınts,oDden, unten 
&: Stack wird dureh Befehl geshifter 
IN: Einasberagister der Funktion 
U Ausgstersglster der Funktion 
Ab: Rbkörzung, dee nach Funktionsaufrur ın der 
zweiten Zelle des Eildschirms erscheint 
sh: Shift „ Cr: UTRL = Control 


Wir senden Ihnen gerne unseren 
Softwarekatalog mit 
über 100 Programmen! 


{Natürlich kostenlos!) 





Taztein) Funktiensyeise IN OU Ab 
PL Delste, Lösche voriges Zeichen 
sh PL Lade x mir RCiD, i wird ersrage x .953 Racor 
Ct PL 1) Lade Stack sus Rcü-3) x-T Kecs 
23 nach "5TA"; entferne x,Y aus xYv Tr SA 
Statistischen Summen 
PR 1) als !-tes Zeichen: X in Hexa N 
2) hinter Hexa-2ahl: X in Dezi x = 
Sh PR Laie Roi? mie X, i wird erfragt x StoR 
CL FR 1) Lade R(&-I3) mir STIER K-T St0$ 
2) nach "STA*: X,Y zu Stat. Summen 9 Ei STh+ 
PO Schiebe Stack nach oben X-T x-T StUp 
sh PO Rolle Stack nach oben x%-T  x-T Roiu 
Cı FO tausche Z und T 2,1727 Ex2T 
PU Schiebe Stack nach unten x%-T  8%-T 5100 
sh PU Rolle Stack nach unten 8-T 3-7 kalD 
Er PU tausche X und T KV KN EriV 
CLEAR lösche Stack x-T elst 
CLERR lösche Speicher RcB-15) <lRe 
‚*#,/, Grundrechensrter für A0S x x SS ROS 
<Fi>  ARadition für UPH K=y+X NY RS YeX 
<Fi>  Addiere X zu Kcı), i wird erfragt X Re+X 
<F1> konplexe Addition R-T xy Casd 
xF2> Subtrsktion tür UPH Kay-x KEY RX Ss Y-x 


<XF2>  Subtrshiere X von RCi) x Ra-k 


"OF 
<F3> 
Sh <F3> 
Cr <FD 
xF4> 
35h <a) 
Cr <fs> 
DE. 7 
cr 
Lt. 
er. : 
coR 
Lech 
ACC SRET> 
R3SL:KRETD 
Au 
BIH 
ROM! 
UIM 
NIT. 
FLO 
"EEG 
Fir; 





ShiPL>Cursar 
VSHKFEICUF ED. 


Tg 








komplexe Subtraktion 
futtiplikatıon für UPN Xayax 
Mulitipliziere X ın Rli) 
komplexe Multipiıkation 
Diwizicn for UEN X=y7X 
Divilara RCi) durch X 
kemgplexz Division 
Rezıprokuwert N=1/X 
Fotenziere X=Yhoch X 
Usrzeichenwachsel 

Fakultät von X 

zeige. RCH=15) auf. Bildschirm 
Hardcopy 

Breus-Cosinus von’X 
Hreus-sinusvon. X 

MKitroeger. Hilfsfunktionen 
Sinminsiköosffigient 
Kommentäarlzor. Gratik 
mininsbe und max imaleik, Y' Verte 


einer: Funktionin Parsuieterdsrst. 


Stan NMittelsino. Standsrdsbo, 
glötre FoäkticnliNÜin Färaneter“ 


SBarstellungininnn 
linwars Kegression 
EDEERETS Statıstiklleer 





tÖEinneitinach Yinkz 
KEirheit'nach rechts 
8/Einheiten nach links 
&:Einhelter nach rechte 








x-T xy 
KVX OS 
x 
x-T xy 
KURS 
x 
x-T %y 
KK 
BUN OK 
xx 
KR 
KK 
KR 
Rex O5 
K,V.OXN-T 

K-T 
K=T. 

Ne} 


in Graph bewegen (hinter FLO)! xX,Y 


P.: Position inX,V ausgeben KV 
e Verla&sen:der Routine 
DEG:: 4nN:Srad: umwandeln x x 
DIF: EDEfferenziere Funktion x x,# 
> EHD: SCHLCUL besanden 
EbiintiifFunktion IN editieren 
HELEN AHDeitIng ausdrucken 
BE Sun Ende der Anleitung 
inlntegral der IN-ten Fkt in (X, v2 
SERARSNEFSSSIN körtesische Koord. wandeln KV KV 
EINSEE minimale und maximale Fkt-kerte RY ZT 
LINE lineare Interpelatinn Pi0-3) K,Yx-T 
Lian 8 Zshner lagarithmus x ” 
FL; = Kreiskonetante I.1415,., x 
PLN.“ Kuruvs platten x-T 
FOL e in Palarkoordinsten wandeln 2, NH,V 
PYTO Pythagoras KeX+Vey KV Rx 
RAD...®. im Bogenmaß umwandeln x x 
RUN" Funktion IN Aufrufen beliebig 
USE ® frei definierbarer Befehl 
ZER = Nullstelle suchen K,YxX-T 
Steuerparameter: 
IN Funktionszeigar IN=1-3 
IR Speicherzeiger IR=G-15 
15 Statistik 15=8,1 
IP Druckerprotokoli Ifes, ı 
DI Intervallteiler Di=1m9 Standard 
FE Fehlergräße "ZER" FE=1.E-5 Standard 





Crub 
vrxX 

Kexx 
Cs 
WIR 

Rein 
Usiv 
IX 

WERK 
ch3x 
Fakx 
ReAn 


ACcO 
Rsl 
EIn 
Kcd 
ui 





IT 


FLO 


vi 
tm 
IT 6: 


LUR 


DES 
DIF 


EDI 


{Mi 
KAR 
LIM 
LIN 
1.193 
FI, 
PLY 
PYr 
RAO 
RUN 


ZER 
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a ETUI EIER ENGER BEER SRTeTeRCITEEESFENFEEETE SEES ABER DEEP REFERENT EEE zer Een Se SEIEN ETAREBEETTEE 


EB 
4ECA 
4ED5 
4EEO 
4EEB 
4EF& 
4ro1 
AFOR 
417 
4FER 
AFED 
aF38 
AF43 
4FAE 
45? 
ar&s4 
AFösr 
aF7A 
A4FB5 
4F970 
ArYpE 
4FA& 
aArFBi 
AFEC 
Ar07 
4FDE 
4FDnD 
4FEB 
AFFE 
4FFE 
Oo? 
SsOo14 
Solr 
SOEA 
SOFEZ 
SO40 
Sof 
SOG& 
061 
ORG 
3077 
SO82 
SOSD 
3098 
SORS 
SOAE 
ZOEBP 
Ssoc4 
SOcF 
SODA 
S0ES 
SörFO 
SOrE 
3106 
sill 
Sich, 
St27 
SL 
S15D 


148 


Pe) 
00 


An 
Da 


2) 
O0 
an 


CA 
CD 
ER 
SE 
zo 
CA 
ZU 
OD 
43 
20 
20 
CA 
Fi 
CA 
ZU 
20 


te 


cA 


I 
m. 


EA 
SE 
4.0 
20 
52 
Au 


te 


2 
Sn 
= 


=2DNE 


42 
rn 
ee 


45 
48 


[oo 
uns 


48 
ED 
&D 
353 
SE 


53 


52 
20 
45 
42 
zo 
48 


a5 


20 
DE 
Fo 
48 


GE 


OD 


49 


.— 


ar 
OD 
Fr 
20 
7 


20 
27 
=D 
4i 
37 
29 


SI 


40 
20 
4& 
20 
42 
SF 
FF 


er 


ED 


BO 
ZE 
0 
ZOO 
SE 
40 
go 
=O 
20 
SE 
zo 
zo 
ZO 
FS 
an 
ca 
ZOO 
Er 
&D 
ZO 
EO 
=ZO 


ae 


08 5 


CD 
20 


oA = 


CD 
20 
Eo 
20 
CA 
CA 
20 
ZE 
20 
ER 
20 
OD 
48 
20 
CD 
CA 
CD 


EZ 20 
eo 20 
2a ZOO 
= 25 
sd 48 
4E 20 
71 79 
20 Po 
AD 4D 
20 20 
42 48 
au 20 
Z1.:30 
AD a0 


zo 
54 
FS 
So 
34 
47 
45 
DE 
oo 
C7 


Fi 


47 
za 


ER 
&D 
E4 
&D 
ee 
=D 


EA 


409 


an 
ZOO 
20 
ol 
20 
2u 
GA 
DO 
20 
CA 
EoO 
&D 
20 
E4 


40 
el 


44 


20 
u 
48 


zo 


zo 


Fi 
CA 
2O 
20 
20 
oO 
GA 
FS 
20 
EI 
20 
OD 
48 
CD 
Er 
E2 
Fi 


mn 


ur 
45 


u 


39 35 


ee) 


20 42 


FS 
OD 
SB 
ar 
Ar 
5% 
54 
Ar 
54 
3E 
29 
47 
FF 
Bs& 
O0 
oi 


SE 
35 


2 


2 
3? 
43 
Aa 
32 
Ar 
OB 
43 
=O 
34 
47 
sl 


CE 


men 
Pa 


SE 


20 


4E 


> 


zD 
au 
oO 
OD 
&D 
4 
49 


48 


59 
ol 
53 
2 
20 
mr 
20 
20 
20 
4E 


u 


De 7 


Bor 
we 


ar 
54 
AE 
30 
47 
11 
OB 


20 
40 
Er 
20 


A 


20 


GA 


ED 
Er 
CD 
SO 
ER 
20 


IE: 


CA 
CA 
ER 


20 
20 
AO 
DO 
au 
ER 
20 
E4 
u 

47 

4: 

20 
20 

47 
vr 


u, 
er 


Ku De 


ac 


urn 


ae 
OD 
"48 


45 


Eu 
Fi 
20 
CD 
Fi 
oO 
ca 
0 
Do 
SD 
au 
2 
En 
40 
20 
8 
20 
O% 
20 
ZO 
I 
FS 
20 
E4 
au 
Eo 
E& 
54 


em 
ber 


ER 
1 

zo 
Ca 
21 
zu 
Eo 
ZO 
OD 
43 
zu 
EO 
Er 
Fi 

ER 
zo 
Du 


zn 
DAN 


20 
ZO 
Do 
ZE 
au 
EO 
an 
OD 
45 
4 
AD 
57 
41 
=0 


4 


onen 
* 


I 


E ac i 
BEE B;,- 
Base. 


ES 


Or 
43 
Or 
Zi 
40 
AB 
44 
45 


GE 50 45 
au SE Do 
45 49 572 
ao 21 98 
aa an Fi 
5A 20 78 
SE 20 46 
A4F 4E 20 


Fö 
20 


a8} 


mr 
Ba 


07 
OR 


rE 


zo 


AB 


er 
Fü 
20 
BO 
CD 
O0 
20 
EA 
CA 
au 
CD 
u 
CA 
20 


>= 
E ER 


Da 


20 


08 = 


20 
20 
E4 
DO 


eye 
berke 


20 


45 
41 
45 
47 
CD 
49 
54 


= 


DE 
FF 


nn 
nt a 


SE 





2 
44 
| 


er 
= 


37 


28 
43 
OD 
44 
a3 
20 
2 
&D 
a8 
52 
Ar 
Ft 

Fo 
28 
LA 


FE: 

















! 
\ 
8 
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sic 
S1CC 
=51D7 
Eier 
SiER 
SıF8 


wem 
warten 


eng 

SEOE 
zen in 
at 
erg 
De 


mean 


at 


SEA 
nen are 
ee 


GO 


IE 
DEZE 


Michael Baumann: 


Das Programm ist ein Utility für 
das Colour Genie mit 16 oder 32 
Kilobyte Speicher. Es ist 3,1K 
lang. 

Invers ändert zuerst einmal Gra- 
fikzeichen von 191 - 255 (dadurch 
bleibt die erste Hälft der Grafik- 
zeichen frei für eigene Verwen- 
dung}. Danach werden diese, den 
Tasten entsprechend, im MODSEL 
Modus auf die Tasten, über die 
man normalerweise Grafiksymbole 
erreicht, verteilt. Danach sind auf 
jeder Taste 4 Buchstaben oder 
Symbole verteilt. 

In der Hardcopy sehen die in- 
versen Buchstaben etwas breit aus, 
aber dies mußte sein, da das Co- 
lour Genie das Bildschirmsignal für 
normale Fernseher verbreitert und 











z2 oOE 4 AF FE IC AR 21 
ıS 48 TE 12 Z2 07 48 E85 
23 40 Fi 21 00 on 22 04 
49 22 Ca 48 SE 05 I2 AE 
en &D 48 7o 2a zo au 20 
x >68 20 

ao 20 20 Do CR 

ac CD 20 49 CD 

7 Er AA Ace 

D7 FE DE FS CHE 

cm BA ACC ED 0 

36:24 He 47 2 

Bo 21 &F FT ii 

BB CD 50 490 CD 

CD 50 An DD 21 

21 0A 48 CD 50 

4c 23 00 44 22 

} 20 3 36 2089 
gan an 7 mn mem nd 
era a 20 Ne Da 
ya 20 20 Du Do DO 0 
EEG ER DE 40 FL DA OF 
AU ZR: OD 49 Ch DA 05 &F 
a2 20 40 CD &5D 48 









dadurch schmalere inverse Zeichen 
nicht mehr als diese zu erkennen 
wären. ; 

Wie Sie die Drucker-Grafikzei: 
chen in den Zeilen 114, 125 und 
128 interpretieren müssen, . läßt 
sich aus der Hardcopy erkennen: 
Nachdem die inversen Zeichen ge- 
neriert wurden, bleiben sie erhal: 
ten, bis die Grafikzeichen von 191 
bis 255 geändert werden, das Pro- 
gramm ist nach der Generierung 
nutzlos und kann vernichtet wer- 
den. Sie können natürlich auch in 
Zeile 130 ein DELETE 100-201 
bringen, welches bewirkt, daß das 
Programm sich nach der Generie- 
rung der inversen Zeichen selbst 
sofort rausschmeißt. 


Folgende Tabelle soll einen 


er mer 
ET = 


ir er 


ie 
a2 
zn 
ZOO 
on 


4... 


Ge 





an 
ZEN 
10 
Ze 
2 
.z Anr 


vr 


-yr 


Sr 
um} ‚ 
er “ ver 
oı 
Oo: 


DD 


O7 
Fi 
Er: 
Le 
2 
"7 
AT 
a 
BR 
zo 
0 
ei 
MN 
mm 
VE 
48 


3 Ei 
ED ED 


CF 


Colour Genie 






groben Überblick über das Pro- 
gramm geben: 

100 bis 110 
Die:Grafikzeichen werden zur Mit- 
kontrolle auf den Bildschirm ge- 
bracht. 

111 
Unterprogrammaufruf zur Gene- 
rierung der inversen Zeichen. 

112 bis 130 
Bildschirmaufbau. Wie die Druk- 
ker-Grafikzeichen interpretiert 
werden geht aus der Hardcopy 
hervor. 

131 bis 201 
Unterprogramm, daß die inversen 
Zeichen generiert, mit Data-Zeilen 
und Lese-Schleife. 
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100 
101 
102 
105 
104 
105 
105 
107 
108 
109 
110 
i11 
112 
112 
114 
115 
116 
117 
118 
119 
120 
121 
122 


m 
u 


124 
25 


126 


Geb dab jene 


Bea 


Pe We we en 
OSOSOONDUINPAMNM- OO 


ee 
5 
Plone 


143 


a 
2, Hr pr 
SOoneo-# 


m 
[N 
> 


151 
152 
153 
154 
155 
156 
157 
158 
159 


PU = 
GR = 191 


TO 500 z NEXT I 


PRINT "rrirriirtirtirrrittt gr ern naenum n en en 
PRINT : PRINT 
FRINT "Neue Tastenbelegung :" 


FRINT "Ohne <SHIFT> und ZMODSEL> ;" 
PRINT "QWERTYUIOFBASDFGHJKLS - ZXECVBNM,./" 


FRINT "Mit <SHIFT> und ohne XMODSEL>F :" 
FRINT "qwertyuiop "asdfgh;kl+t=zxcvbnmä>r”?" 
FRINT "Ohne <SHIFT> aber mit XMODSEL> “ 
FRINT "e’ıun "TUÜPSEBEHKFAOL HÄNGT «Hi hKübaka" 


FRINT "Mit X{SHIFT> und {MODSEL> :" 
AR ER TA 5 
FRINT : FRINT 

: END 


-) 
7 
7 
z 
4 


DATA255,249, ‚231,231,207,159,255 
DATA2SS5,255, ‚255,243, 243,231,255 
DATA255,249,243,207,207,243,249,255 
DATA25S5,255,129,255,129, 255,255, 253 
DATA255, 159,207, 243,243,207,159, 255 
DATA255,195,155,243,231,255,231,255 
DATA255,1975,153,145,145,159, 193,255 
DATA2SS,195,153,153,129,153, 153,255 
DATA2S55,131,153,131,153,153,131,255 
DATA255,195,159,159,159,159,195, 255 
DATA255,131,153,153,.153,.153,131,255 
DATA255,129,159,135,159,159,129,255 
DATA2SS5,131,159,125,159,159,159,255 
DATA2S55,193,159,159,145,153, 195,255 
DATA255,153,153,129,153,153, 153,255 
DATA255,195,231,2531,231,231,195,255 
DATA255,129,249,249,153,153, 195,255 
DATA255,153,147,135,147,147,153,255 
DATA255,159,159,159,159,159,131,255 
DATA255,153,129,153,153,153, 15T, 255 
DATA255,153,153,137,145,153, 153, 255 

255 

255 

255 

255 


DATA255,231,221,129,221,221,255,.255 
DATA255,255,255,255,243,245, 231,255 
DATA255, 255, 255,129, 255, 255, 255,255 
DATA255,255,255, 255,255, 231, 271,255 

AT 

u | 

7 3. 


DATA255,195,153,153,153,153,195, 
DATA255,131,153,171,159,159,159,2 
DATA255,195,153,153,153,145,195,25 
DATA2S55,131,153,131,159,147,153, 





Een) 


r (cr fr 


Ir min cee ir end 


0 CO JAN I DEI 


ON Cr 


va 


! 
22 
78 
75 
77 
73 
79 
= 

181 
132 
187 


1243 
89 


BE 
185 


187 
ı88 
187 
199 
191 
192 
193 
194 
195 
196 
197 
198 
199 
FON 
201 


EEE 


RER. 
























195,249 ,483,.121,253 
ERTATSinnSilaeeis 2 
Er u ee 
1,53,.1334,195, 231,285 
192, Lasst 271527 255 
PRISEETL EIS I BL, 55 
I ee ne ee 
DATA23S5% 2234, 207,359.127, 255 
DATATSS art Sen, 00s,2758,288 
DATA?SS BASEL AST AATSIGDL ES 
DATA2SS I ee 
DATAZES. ‚195,157,159,195,255 
DATA2SS =29.43973,157,.192,295 
DATA2SS 414741253: 199,199, 255 
DATA2SS: [23420075 207,207 2259 
DATAZSS AT, IS, D 129, 
DATA2 En 147 
DATA? 3 ie®, 
DATA2! EISEN 2ET:L: 195 
DATAR % ATLL 
DATAZ 2 SL 
DATAZSS Ad 


DATAZ 
DATA=SS, 











DATAISS, ‚255 
DATA2SS,= ‚255 
DATA2SS, eg 
DAaTaAzSE 35,255 
DATA2SS,>23 27,255 
DATA2SS,2 „157,192,255 
DATA2SS, 22 rc ee 
„1ı29,132,255 
251,193, 255 

‚249,243,255 

207,1975,255 








ERFEEN En vememee: EBENEN, 
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Kane, 
„Alan 


tun 


TG FL 


"a 


19 
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Rainer Schmies 


ZAP ist ein Programm für den TRS 80 
oder Video Genie in Z80 Assembler- 
sprache geschrieben. Es ist eine Art In- 
vaderspiel mit Ton und Grafik. 

Sie haben die Aufgabe die Raumsta- 
tion, die in der Mitte des Bildschirms 
postiert ist, so zu steuern, daß Sie die 
von allen Seiten angreifenden Gegner 
abwehren können. Die Geschwindigkeit 
mit der die Gegner auf die Raumsta- 
tion zufliegen steigert sich dabei au- 
tomatisch. Gesteuert wird die Raum- 
station durch die vier Pfeiltasten, 
die bei Betätigung auch gleichzeitig 
einen Schuß in die entsprechende Rich- 
tung auslösen. Für jeden vernichteten 
Gegner erhalten Sie 63 Punkte. Haben 
Sie einen neuen Highscore aufgestellt, 


Sr6bß: 055 

3:70: Bi 2Q EI CD 
nase IF OA DE SA 
sag: Fr og EF IE 
SszaAQs DF IE CD BE 
SZEG: CD BE SE iA 
SEcH: CD BEER T 
wand: BE Da FF RD 
Szent FE DE GBE DE 








können Sie Ihren Namen eintragen. 
Durch Drücken der Break-Taste kann 
jederzeit das momentane Spiel abge- 
brochen und ein neues begonnen wer- 


den. Die Clear-Taste bringt das Pro- 


gramm zum vollständigen Abbruch, 
In jeder Phase des Spiels ist es mög- 
lich, das Spiel durch Drücken der Ta- 
ste S anzuhalten, nach Betätigen der 
Enter-Taste wird das Spiel fortge- 
setzt. 

Nach dem Abtippen des Listings 
können Sie das Programm auf Casset- 
te abspeichern. 


Start: 5200H 
End: S61A0OH 
Entry: 5224H 









AL ER 5 
ie za En 
28 Zn om 
Ari ad 2 
An RS Na EZ 
Zi BF EF 2 IE 
ae =D 85 233 SE 
EA En CD C& 6 
EI E IZ, 37 ED 
DD E25 ER EA 36 
zu 3 64 3 ER-SE 
Eh &=E AR ze SE 
Een 306 ED FR 2C 
Fe ID FE ED 20 
FC: FÜ: 
3 Ze 29 
DE EEE DE 
BR am ar SE 
z1 95 ! Bi ZB 
Zr DI 35 22 ER BO CD 65 
SE 22 DD SE Bi-F5 CD SC 
Bd EE ZI SD HHOCR DE 7 
15 07 ER 7F 28 Dia EE SF 77 
FS 55 CDD7 SE CD ZE O0 5 
FE OD CA SS 55 05 Sb II BE 
ED BE SE 1A CH E77 IE CD EE 
53 iA CE D7’ IE CD BE TE iA 
EB C7 AZ CD BE 53 18 19 DM 
c9 5: 28 DE CI DE DE FE Pi 
ad FI CH ZE MI DE FF IA SS 
EFF RSS SZ Ib FE BA CD F5 


mu 
Kagel 





c3 
ED 
SE 
ED 
DD 
Fi 


dB 
SE 
1A 
iA 
cr 
DI 
47 














ae: 


Zr 
E 
2 
u 
Zu 
Di 
im 
[9 
ber 
So 


Br 


am rd 


-rı) 


fee 
un 


Bi 
DE 
Arı 
EE 
SE 
Bi 
EB 


. 
En 
= 


BY 


BD 


- 
_ 


Ta 


u] 


FE 
CH 
CE 
1E 
25 


ID 


hen 


12 


in 
De Zu 
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SEFO: 52 47 18 FE SE 32 09 In 5a S2 30 32 54 S2 CR 
Sud: 567 CH IE Sa 21 40 54 11 SC TF Di 07 08 ED BO 21 
Sarg: T2 5A 11 AS SF QL 07 OD ED BD CI 21 79 54 11 PE 
Saza: SF @1 07 20 Ba 21 72 54 11 SC IF. Dil 97 02 ED 
SATZ 89.09 20 20.2020 20 20 28 SC 43 4C 45 Adi 5 SE 
S4hd: IC AS 4E SANAS:SZ TE SE 4 49 LE AS S2 20 ST 42 
Su5B: 48 4D 49 WFST:2Q SH SE 45 SE 45 A4E 54 SE 20 ZA 
Shcl: 50 52 45 SEES 2D 30 45 LE 54 45 52 SE 20 S& UF 
HA7TBr 20 ST 54 AUNSNSA ZB 47 41 4D 45 20 20 20 AE LO 
SuEQ: 45 44 SE FED 4E AF SE ZD 49 4E SS 54 52 55 45 
5438: 54 43 4FAENSEHE AUF SB 59 5 49 47 45 54 20 28 
Samy: 43 = 45 
SAEQ: 52 47 








Sud: LE 5m 
nad: CD TE 
Sarge CR CD 


DAFT: 
ADOBE 


Sig 


lcrHea 
ad 





s520: SC Ba 
Sg3Q: 52 ID Di 


E50: 97 


x 
Bu em r, 
IX = Pe} 
wel E7 
in + 
Fa De 





IE FE 
DE 42 
5 32 
zn ae 
I FE 
55 = 
a7 SE 
HE 7E 
FE 29 
21 57 
ZE >@ 





Send: 20 
SERR: 7O 
SCH 20 8 i 
SEDA: BS CE BE 56 21.60 E22 19 52 SE 85 77 03 02 56 s 
SGER: © BS®Ce 52 BC A 
SEFB: 77 09 FE SC 20 Q4 SE:BO 77 C9 11 4Q 2Q 19 7C DE . ii 
5700: 4D Fe 18 57 7E©FREr20:CZ 67 57 SE 85 77 22 18 52 \ 
5710: 11.00 FF 19 TE2077:C09 SE 20 2A 15 52 77 21 00 
5720: 00 22 18 52 CHZAHIENSZ 70 85 Cz 902 SE 21 DC SD 
53770: Z= IE 52 IE BWT7ZCE ge SE 2A IE SZ 7C B5 CS CD 
| 3719: E93 58 zB 7D. DEICA"FA: SA 57 7E FE 20 C& 67 57 3E 
| 5750: BO 77 22 1E, 52.28 SE’ 20 77 09 SE 20 Zn IE SZ 77 
S7EB: 21 Bd Bm 2 IE SZ CO FE ZE CB CD FE SS In 88 52 
3770: FE 088 CH 7F 57 ZE Di 32 08 S2 SE SF I2 Ba SE CD 
S7enBı FE 58 CD 48 SC CD A9 5E CD Az SE SA BA S2 DD Zn 
57390: 19 52 DD GE BE CHR FF DD 77 BC 2A 94 52 DD AE BD 
mragı DR FF DD 77 ED ZA 94 52 DD AE BE CE FF DD 77 BE 
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rn 


ss 


ER 


nnm{17 


2 Si 4 =] 


Ss 
SSOSERSEH 


no: #6 ker 


HERREN GE 
FEAR ar zn ır 


% 


LE 
mio 
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{A 
De 
23 


SOnzn 


MBEZE 


3972: 
Hosa a 
SIE: 
Song: 
Sog: 
Soc: 
noSDz: 
SeER: 


meriAn 
HT # 


>aQE 
Sale 
= PAuE 
950: 
5948: 
ao: 
5968: 
3970: 
Sag: 
aaa: 
aa: 
BaBZ: 
SIcHa 
HoDE 
SaEN 
ar: 
Sad ı 
Sala 
Spazas 
AZ 
Bu 8 
AS: 


as” 5 


DAID: 
aA: 
ABB: 
ZACH: 
SAaDa 
DAER: 
SAFE: 
SEO: 
SBiD: 


Ey TeRn 
im DE “ 


SB:2: 
Bun: 
SBS5Q: 


SJBEM& 


va 


Dr 
Sr 


> 


DPAMMHTIENAIO 
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m@ 
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De Zee] 


13 
FE 
Se 

ni 
24 
ES 
57 
10 
Bau 
Da 


co 
. 


ber 


ER 
DE 3 


zı 
ES 
SE 
ED 
ED 
o> 
23 
ıiF 
Ed 


za 24 55 
D= CB FF 


Ca za 84 
ARE FE CH 
77 FD ZA 
DD AeE 982 
BD 77 Di 
Sa DD BE 
FF DD 77 
da 82 DD 
C©B FF DD 
Zh ou 58 
42 Co FF 
42 TA Du 
HE 45 CH 
as’ RF 32 
4. Da S= 
ES 22. -DE 
D# FF iR 
ıa Sa 75 
ca 11 80 
7F pa ca 
ER Ei 59 
zu 10 SE 
Bi ZE 12 
z2ı FC ZD 


BR 
Do SC 8 


BE Sc BR 
za 00 SE 
En si 5A 
ıE SE: FE 


aaa 19 


En ES .DE: 
um am 19: 


BE CH 17 
Bi 23 22 
zı 23 Q% 
7c 53 mi 
DQ Di i 
37 ID FE 
Sm TE CH 


Jan Di 


22 ED EQ 
2 ED EQ 


za 10 _S2_: 


Ba SA 21 
in 52 14 
18 5# 7D 
oz Fa 5A 
ı1n 5: E53 
ED SS Bi 
D9 Di 81 


=E 35 m 


Bd DS 2 
BB C9 2E 
208 ED EO 
DD ED EO 
[2 67 57 
11 56 09 
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55 
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nm 
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SEO: BF 77 38 FE 77 2= 06 72 Bi 2% 
SESQ: £3 iR: 78 19 3E 0 ER ®E 

insg: DE FE TEL DE ze a: D: 
spaQ: FF LC3 an Ge en SE 2: 
GEBR: 27 za. ED: 35 ED ED zn 4i 
SBCQ: 11 QESC 12 13 13 am he 
MEDZı DE AG TO Sn LESE et 
SBEg: 55 45 | i SB Ba ir 
SpeQı DEZ A IA SMEr 26 aa CD aA ED ar 
S5coa@0: 2175 1 39. 2 2 FE 





Setg: 21 DA 
Sc2Q: an .cD 
SCH: AS'2E 
ScaB: 79 61 


ru 

D 

S 

S 

in 

Bed 

02 

{2 
“io 
aD 





KT 





ae 
3052: 1 CD AR 
ScEA4 22 m A 
S07Zgı NZ = u 


ScgQg: 5: 29 = 
Schg: 29 2 
ScAd: 20 = 


SCER: ZU 5 22 
ScOz: 20 22 22 Du 
Schod: z0 E So 2 
SOEBT SEE ar 


SscreB: Ss 28 
Spoafe 40 52 


SpiR: SE ZU So 
SDEB: 29 48 EB 


SDEB: Ar 49 
SD4D: 4G LE 
SDEG: AE 41 
SDER: 4C 4C 
SD72: ZU 4i 


Sg 


SDEB: 647 2 Fa 
SsD32: 45 55 Zu 
DAB: 58 45 kr 


SDEQD: 45 41 4i 
SDER: ZE 2 2 
SDDB: 2 20 zu 





DEN: zn 22 zu 
Sorge 20 2 Ei 
SEDaT EG EZ zu 
SeEiIg: ZONE Se 
Ser: 4 AG 1 
Sad DEE 


SE4B: 45 54 
SESG: 44 4 
SESB: 42 52 
SE7O: 5% 27 


TMerı 


JPPPUPPn 
pr Dre 


GEER: 54 41 

„Ess 28 20 2 

SERD: 545 4B 
SEE: 3 SE zu 
SecD: 53 47 ‚ci 
SEDGE: SE 45 zu 
SEER: 29 22 2 


SED: 20 22 20.20 20.20.20:.20 20 20 20 20 20 20 20 8 
SFaR: _22 29 2020202020 20 20 20 20 20 20 20 2D 2Q 
Sprit 28 ?0. 2U 20 20 ZB 20 20 20 20 2m 20 2a 20 20 20 
Spalt 20.20 20 20 20 20 20 20 20 20 20 20 :E AD Ai 55 
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BeImE ID Sa 4G EG ED AUG AF SE GE An EG A245 20 37 49 
Sud: SA dan Zu SI AF SS MI DI ZO ID 20 ED ZB EG 2 
SFSB: ED 22 EU 20 20 20 ZU TO 2 ED EU 


| 
= 
fr. 













SFED: = DD 205 20 22 20 0 20 20 2 2 2 ag 
SF7B: 30 7D 20 20 2u 20 20 2a 20 m 20 28 20 22 20 © 
SFog: 78 20 20 20 TO 22 20 Ta 20 20 20 20 22 20 20 29 
SFIB: zB 20 22 20 20 20 20 ZU 20 25 22 4E AF SQ 55 55 
SFAD: 49 47 LE Sk 20 28 AS 23 22 Zi 39 IB IE 20 am 58 
SEE: DB 52 Al 49 4dE US SE MM SE UE AB AD 493 45 55 © 
SFÜB: ZB AS GE AU AF AT LE 45 ZU 20 57 45 SE 54 2D 47 
SFDE: 45 52 4D 4i 4E 59 20 20 28 22 20 UM 0 20 20 2 
SFEB: 20 208 22 20 20 20 20 22 ID IE 22 22 20 20 20 2 
SFFB: 208 20 20 20 20 20 20 20 20 20 20 20 20 20 29 z 
EnBDB: 20 20 22 20 20 U 20 U 20 DB 2a 20 a2 29 20 
EQiId: 20 20 Zu 20 20 20 20 2 ZB 20 26 20 IE 20 TO 2 
ERrB: 20 I2 20 20 2B 20 20 zu ZU 2a 20 28 ID 22 50 Sr 
EBOTU: 45 SE 55 20 S0 45 LE 54 45 Sm.SE 28 54 AF 20 55 
EZug: 54 Ki SE 54 20 47 41 AD 45 20 22 IR 20 28 20 0 
EBQSR: 20 278 20 20 230 20 20 20 22 20 20 ID 49 a8 FE OD 
EREB: z2 Fa ca 25 O9 19 FE O3 ni DZ O9 IE TE RE iA SE 
E072: Bi ID 38 59 TE BE CD 30 E50 Hb an FE IE AS ME 
EB: 45 DE FF AO FO CO9 CD OS Bi 21 ER Si ti DR IC Di 
EuSR: 293 DE ED BB CD E55 EB In DE SE ES DI za DE SI 75 
BORD: 32 FE AF EB DE EN SE 7D a FE REF EB DT ED 52 OD 
EBOBu: 03 Bi 2A DE Ir 22 an 5: mi ER 6ER 1i 2A EC 21 50 
EOLd: BD SD EB IE On CD AS SC iD 28 FA Ch FZ ar 1 CE 
a ED 6 12 DD H 79 81 ID AS O2 FE MD CA ED SE 77 
EZE 2 DB 28 DD 25 AD ER CE ED SE AR AF AE GT SE 
no 55 40 41 5A LO UF LE 57 a Sal Dr Dr 
Binz: aAF SS 20 SE 45 Ai Ss : i 45 
Bi: 2D 4E 45 57 20 47 ‚ö 47 
Bien SE AS HE SZAUS A 5% 
44 5% 45 20 45 4E 
55 AO AC 2 AE üi a8 SE 
55 AD 2 43 55 72 } 5 di 
IS SEM EI U BR A 45: 26 
43 52 A4E LI AD 45 3q 15 Sa 50 >0 39:98.; 
LE 43 LE AE292D 20 20er 
5: 55 TE CE" OF" 77 CD SSR eo Se 


Anzeigenannahmeschluß 
für die Nummer 4, 1984 
ist der 
20. Juni 1984. 
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Mitteilung - Mitteilung - Mitteilung - Mitteilung - Mitteilung 


MÄUSERENNEN — HELIKOPTER Mit der nächsten GENIE DATA startet unsere Aktion 


Die Mäuse rennen, die Helikopter fliegen!!! 

Aber noch ist es Zeit auch für Siel Machen Sie mit! Noch 
können Sie gewinnen! 

Eisendeschluß für die letzte Rennmaus und den letzten 
Helikopter-Flug ist der 20 Juni 1984. Also lositl 


NOEH IST ZEIT, ETWAS ZU GEWINNENIH 


LESER SUCHT LESER. Unter dieser Rubrik kann jeder 
GENIE DATA Leser seine Adresse veröffentlichen, um 
Kontakte zu anderen Lesern zu finden. Wenn Sie mit- 
machen wollen, schreiben Sie uns eine Postkarte, auf der 
Ihr Absender steht und auf der ihre haupsächlichen Inte- 
ressen angegeben sind. Z. B. Paul Müller, Meierstr. 4, 
1234 Schulzhausen, Interessangebiet: A/D Wandler, Colour 
Genie. Und wie gesagt, dieser Service ist kostenlos für alle 
Teilnehmer! Aber: Unter dieser Rubrik werden wir keine 
Softwaretausch Anzeigen veröffentlichen! 





COLOUR-GENIE SOFTWARE 


SCHMIDTKE 


electronic 
Büro- und Personalcomputer 


Sandkaulstraße 84 - Telefon: 0241-232 17 
5100 AACHEN 


Wir senden Ihnen gerne unseren Softwarekatalog mit über 100 Programmen! (Natürlich kostenlos!) 


NEU 
AKTUELL 
PREISWERT 





ANDROMEDA 


Ein erstklassiges dreidimensionales Weltraumspiel mit ansprech- 
ender Grafik. Feindliche Raumschlffe Kommen auf Sie zuj ver- 
nichten Sie diese, bevor Ihnen wertvolle Energie abgezapft 
wird. Ist die Zeit abgelaufen, so eilt Ihnen Ihre Mutterbasis 
zu Hilfe, aber das Auftanken will auch gelernt sein. 

(TCS) Art. 828 39.- mM 


PAC-LAB Hi (von:PYr. Thomas) 


Endlich eine. wirKtich.gelüngeneVerslon:des-bekanntenund 
beröhmten ’Pac: = Man’ von "Atari! 

Hit wunderbarer. Grafik, Ton, etc. 1m: Gegensatz zum Original 
vergrößert sich die-Anzahl der "Geister imSpielverlauf:und 
macht das Spiel somit noch Interessanter. In:einem:LabyrIinth, 
das den gesamten Bildschirm ausfüllt, müssen Sie.als’EuIT- 
Emil” möglichst viele Punkte sammeln, ohne von den ’Gelstern’ 
eingefangen zu werden. Die besten Spieler werden in einer 
Recordliste angezeigt, so daß Sie in Ihrer Familie o.ä, regel- 
rechte Wettkämpfe austragen Können. Pac-Man ist eines der äl- 
testen Video-Spiele, .... und#ihes der schönsten. Nicht um- 
sonst ist es so berühmt! ’PAC-LAB’ Ist die verbesserte Version 
für Ihr Colour-Genie. Art, 833 SeS 39.- DM 


PAC-LAB IH 


Die Nachfolgeversion von PAC-LAB: Das Bildschirmformat wurde 
durch Umprogrammierung des ERTC vergrößert, so daß ein noch 
größeres Labyrinth zur Verfügung steht, Der Ablauf ist etwas 
abgewandeit und die Geschwindigkeit steigert sich von Spiel zu 
Spie} enorm. PAC-LAB II ist somit noch interessanter, noch 
schneller und noch schwieriger zu spielen. Natürtich mit 
ausgezeichneter Grafik und hervoragendem Ton. Geschrieben von 
Patric Thomas. Art. 848 SeS 49,- DM 






MOTTEN 


Mut dem Bieidschı a erscheint eine Kolonne MOTTEN, die zunächst 

ım Sturztlug auf Sie herniederfaltt. Dansch Sschwirren Sıe uber 

den Bildschirm, setzen mıt der Zert ımner öfter zu biitzartigen 
Sturzsflügen an und beschießen Sie mit Torpedos. Wehren Sıe 

sıch !  ... aber mıt Bedacht. Jeder Schuß von Ihnen, der keine 

Motte trifft, verschlechtert Inr Gesamtergebnis. 

(Tcs) Art. 822 39.- DM 


VIER GEWINNT 


Das ABSOLUTE DENKSPIEL !! -. Ihr kleinster Fehler wird vom 
Computer bemerkt. Die Kleinste Unaufmerksamkeit führt zum 
Verlust der Partie. Der Computer kantert schnell und zuver- 
Jässig, Sie haben fast keine Chance, Zie) ist os, Spielsteine 
In ein senkrechtes Gitter einzuwerfen und dabei vier Steine 
waagerecht, diagonal oder senkrecht nebeneinander zu 
platzieren. Das Programm arbeitet in Maschinensprache, so daß 


Ger Gegenzug sehr schnel! berechnet wird, 
(Kurt Bändker) Art. 852 $e5 25.- DM 
LABYRINTH R. Mir) 


Eın Spiel für Leute mit gutem räumlichen Denkvermögen ! 

Sie befinden sich in einem Labyrinth und sehen nur Mauern, Gän- 
ge und Türen vor sich, Ihr Ziel ist es mit möglicht wenigen Zi- 
gen dem Ausgang zu finden. Art. 813 SeS 19.,- mM 


ZAUBERWÜRFEL 


wer kennt ıhn nicht, den “MAGIE - LUBE’ mit seinen unzähligen 
Möglichkelten, Mit diesem Programm haben Sıe Ihren Zauberwurfel 
In den Computer gebannt. Sie Können ihn per Tastatur in jede 
Richtung drehen. Schaffen Sie es, ihn richtig zusammenzusetzen? 
Wetten. daB, var.. Sie verzweifeln ' 

{Rn Mir) - Art. 814 SeS t9.- DM 


MASTER MIND 


Das groisenäpreh,.n. su für: kluge Köpfe ! 

Kombinieren. Sie.:richtig,.werten. Sie. die Hinweise aus 

und’ Knacken. Sieden Farben. = CODE" des Computers, 

Es ist Kein!teeres Versprechen wenn: wir. Innen’ sagen, 

daß schon nach kurker Zeit: die. Köpfe qualmen’ 

{R. Mir) Art.813 Ses 9. DM 


MAXIMILIAN & Rzwo-Dzwo "32 K 


Was ım Film unmogl ich ı=t, Ihr Colour Genie.schafftes. 
Maximilian aus dem SCHWARZEN LOCH’ und: der. sympatische 
Rzwo-Dzwo aus dem ’KRIEG DER STERNE’ sowie"seine Brüder treffen 
sich zu einem Duell. Strategisches Denken ist Voraussetzung, um 
gegen den Computer gewinnen zu Können. In dieser Nim-Spiel 
Variante mit schönsten grafischen Leckerbissen haben Sie eine 
Gewinnchance von max. 33% ! (und das nur bei den ersten Zügen 
spätere Fehler führen unweigerlich zum Miserfolg.) - Natürlich 
mit Musik und Soundeffekten. ACHTUNG: Da dieses Programm sehr 
umfangreich ist, muß Ihr Colour-Genie bereits auf 32 K RAM 
ausgebaut sein, 

{R. Mir) Art. 818 S®S 23.- DM 
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Assembler - Teil4 


Es geht weiter mit unserem As- 
sembler-Kurs. Bevor Sie sich jetzt 
aber alles nachfolgende einverlei- 
ben, zuerst die Auflösung der Fra- 
gen aus Teil 3: 

1. Das R-Register ist das Refresh- 
Register und wird zur Auffri- 
schung für die RAM-Bausteine 
gebraucht. 

2. Das Beispiel beginnt bei Adresse 
7FOOH = 32512. 

3. Nein, es kann nur mit A oder 


A‘, aber nicht mit beiden zu-. 


gleich, gearbeitet werden. 

A. Die größte Zahl ist 65535 und 
die kleinste O. 

5. Nein! Das C-Register ist ein 8- 
Bit Register, die größte Zahl die 
es aufnehmen kann, ist also 
255. 

6. Das geht! Das BC-Register ist 
16-Bit breit, die größte Zahl ist 
also 65535. 

7. Man ändert in Zeile 40 die Zahl 
3FFH in 10 (oder OAH). 

Wenn. Sie mehr als eine Frage 

falsch beantwortet haben, sollten 

Sie sich den letzten Teil des As- 

sembler-Kursess noch einmal 

durchlesen, ansonsten machen wir 
weiter. 

Wie im letzten Teil schon an- 
gekündigt, wollen wir uns heute 
einmal etwas näher mit dem Hexa- 
dezimal-System befassen. Um ganz 
genau zu sein, muß ich sagen, daß 
es eigentlich Sedezimai-System 
heißt, da sich aber Hexadezimal 
eingebürgert hat, wollen wir diesen 
Begriff auch benutzen. 

Woher kommt also das Hex- 
(Hex = Hexadezimal!) System, 
und wofür braucht man es? 

Das ist beides schnel! beantwor- 


tet! Es kommt (woher auch 
sonst?!!) aus Amerika. Und zwar 
von „Big Blue’. Ganz richtig, 


von IBM. Man hatte sich da Ge- 
danken gemacht, wie man duale 
Zahlen übersichtlicher darsteilen 
kann, als mit den vielen Nullen 
und Einsen. 

Man kam auf die glorreiche 


Idee, jeweils vierstellige Dualzah- 


len zusammen zu fassen und ge- 


langte zu folgendem: 


2001 =3H 2 
0100 84H. 8 
010%, =5H.::: 


.0110=6H 

-0111=7H 
...1000:= 8H 
1001 =9H 





Das war natürlich sehr praktisch! 
Jetzt konnte man z. B. die duale 
Zahl 11100101 durch ESH erset- 
zen (ESH = 229). Man sparte da- 
durch viej Schreibarbeit und die 
Arbeit beim Programmieren war 
weit weniger fehlerträchtig. Alle 
anderen Firmen, die sich bis dato 
noch mit dualen Zahlen qauälten, 
gefiel diese Idee so gut, daß man 
sie übernahm. 

Nachdem Sie jetzt wissen, wozu 
Hex-Zahlen gut sind, und wo sie 
herkommen, wenden wir uns dem 
Problem zu, wie man sie in unser 
dezimales System umrechnet, und 
umgekehrt. 


Also: Die linke Stelie einer 







3. Stelle | 2. Stelle 
16° =4096 | 16? =256 16? = 16 


. Hex-Zahl hat folgende Werte: 


















N “ist die Hex-Zahl 
immer durch ein: nachgestelltes H 
gekennzeichn u): 

Die nächste Stelle ( zweite 
von links) hat die gleichen Werte, 
aber.-: multipliziert mit 16. Die 
nächste. Stelle hat die gleichen 
Werte mal 256, ı und die letzte Stel- 
le hat die. ‚gleichen. Werte mal 
4096. Wieso. die. letzte Stelle? 
Es gibt.doch sicherlich mehr Stel- 
len.als 4? 

In.der Tat! Aber die größte dar- 
stellbare: Zahl ist: ja. 16-Bit breit. 
Mit..einer. Hex-Zahl stellen wir 4 
Bit. dar; Also: brauchen wir nicht 
mehr: als 4.Stellen, denn 16 ge- 
teilt. dürch‘4 ist gleich 4. 
„schauen wir uns einmal eine 












::Wertetabelle für 4 stellige Hex 


Zahlen an! 





16° = 1 


Jetzt wandeln wir die Hex-Zahl 
IFE2H in das dezimale System 
um. Und zwar Schritt für Schritt! 

















Also ist 8162 die gesuchte, Lösung. 
Wenn Sie übrigens nicht mehr die 
Zahlenwerte zu den Buchstaben 
A bis F kennen, können Sie die 
in der Tabelle von eben nachle- 
sen! 

Jetzt wandeln wir mal rück- 
wärts. Also eine dezimale Zahl ins 
Hex-System: 

Dazu teilen wir ganz einfach durch 
die größtmögliche Potenz von 16. 
Ein Beispiel: 
39458 : 4096 = 9 Rest 2594 
2594 : 256 =10 Rest 34 
34: 16= 2 Rest 2 
2.3 1= 2 Rest 0 
Jetzt müssen wir noch die ganz- 
zahligen Ergebnisse (9,10,2,2) an- 
hand unserer Tabelle: in: die kor- 
rekte Zahlen/Buchstabenkombina- 
tion überführen: 
9=9 
10=A 
2=2 
2=2 
Die dezimale Zahl 39458 ist also 
gleich 9A22HI 
Pause!!! 
Entspannen Sie sich, lesen Sie den 
ersten Abschnitt nochmal, dann 
geht es weiter. 

So leid es mit tut, wir hatten 
Theorie, und machen auch jetzt 
wieder mit Theorie weiter. Es wird 
nämlich warscheinlich wenig sinn- 
voll sein, wenn ich Ihnen Bei- 
spielprogramme gebe, ohne das Sie 
einen Überblick über den komplet- 
ten Befehlssatz haben, den Ihr 
Z 80 versteht. Deshalb fangen wir 
zuerst einmal mit den verschie- 
denen Ladebefehlen an. Vorher 
aber noch einen Überblick über 


die verwendeten Abkürzungen: 

r = eines der Register A,B, 
CD E,H,L. 

n = Eine 8-Bit Konstante, 


also eine Zahl zwischen 


O0 und 258. 

IN = Eines der Register IX 
oder IY. 

nn = eine 16-Bit Konstante 
{Zahl zwischen O0 und 
65535). 

ss = Eines der Register-Paare 
BC, DE,HL. 

d = Ein 8-Bit Offset (Er- 


klärung später!). 

Jedem Befehi stelle ich ein 
Äquivalent in Basic gegenüber, so 
dürfte die Funktion des Befehles 
für Sie am leichtesten durchschau- 
bar werden. Also, es geht los! Hier 
sind die 8-Bit Ladebefehie: 

8-Bit Ladebefehle 


LDrsr —r=r 

LDr,n _.r=n 

LD r,{HL) — r= Peek(HL) 

LDr,{IN+d) —r= Peek{IN+d) 

LD {HL),r — Poke HL,r 

LD {IN+d),r  — Poke IN+d,r 

LD {HL),n — Poke HL,n 

LD {IN+d),n — Poke IN+d,n 

LD A,(BC) — A=Peek{BC) 

LD A,{DE) — A=Peek(DE) 

LD.A, (nn .  — Ar=Peek(nn) 

LD (BC),A : — Poke BC,A 

LD({DE}; Ai: i—-Poke DE,A: 

LD (nn},A:® ©. — Pokenn,A 

EDARL SEA 

LDA,R' AR. 

LD LA — = A 

LDRA —-—R=A 2 
Ladebefenle 16-Bit..... ...hR 

LD ss,nn -ss=enn ö 

LD iN,nn —-IN=enn 

LD ss,{nn} — ss = Peek{nn) 

LD IN, {nn) — IN. = Peek{nn) 

LD {nn),ss „— Poke nn,ss 

LD ({nn),IN — Poke nn,!N 

LD SP,HL — SP=HL 

LD SP,IN _ SP = 

PUSH ss _ 

PUSH AF _ 

PUSH IN —_ 


POP ss a 
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POP AF - 

POP IN _ 

EX DE,HL — Tausche DE und 
HL.. 

EX AF,AF’ — Tausche AF und 
AF, 

EXX — Tausch AF, BC, 
DE und HL mit 
AF', BC’, DE’ 
und HL’. 

EX (SP},HL  — Tausch {SP} mit 
HL. 

EX {SP),IN  — Tausch (SP) mit 
IN. 


Die PUSH und POP Befehle 
sind etwas kompliziert und lassen 
sich nicht so ohne weiteres in Ba- 
sic simulieren, eine Erklärung hier- 
zu folgt, wenn wir uns den Stack- 
Pointer näher betrachten. 

Wenn Ihnen diese Tabellen jetzt 
auch noch nicht allzuviel sagen, so 
brauchen wir sie doch später als 
kleines Nachschlagewerk, deshalb 
folgen in der nächsten GENIE 
DATA die restlichen Befehle. 

Hier noch die Aufgaben: 

1. Wandeln Sie ins Dezimal-Sys- 
tem: 43A2H, F49AH, BCDSH 
und 123F. 

2. Wandeln Sie ins Hex-System: 
63492, 13412, 34392 und 48798. 
3. Entwickeln Sie ein Basic-Pro- 
gramm, das Hex-Zahlen in Dezi- 
mal-Zahlen wandelt und umge- 
kehrt. 

Tschüss, bis zum nächsten Mal! 





Die nächste GENIE DATA 
erscheint am 
15. Juli 1984, 





Anzeigenannahmeschluß 
für die Nummer 4, 1984 
ist der 
20. Juni 1984, 














aan ra a a Sean, 
EELESTERONISERSISERENERENIRSO TEE een 
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„on WM.Grake 









Arıleitung 





Solitair für das Colour Genie, un- schehen zeigt. Spaß. zu: wünschen, und sollte 
ter Ausnutzung aller grafischen Da dieses Spiel sich mit allen Ihnen.das Eintippen zuviel Arbeit 
Möglichkeiten, die dieser Compu- Funktionen selbst erklärt, soll sein, »können Sie..das Spiel auf 
ter im Textmodus bietet. Nach- hier auf eine Erklärung verzich- Cassette: für 19,80. und auf Dis- 
stehend einmal ein Bildschirmaus- tet werden. kette ""für...29,80.. beim Verlag 
druck, der etwas vom Spielge- Bleibt uns nur noch, Ihnen viel beziehen.:: | 


| 






Q 
For, 
| » 
+ 
„ 
1 
Ir 
Zi 


F 
















a 
1.1. 
RER ss Wi A 55 
en a a hen Er en er 
Bietet 
EEE. TE 
BA AA Hems) 
1..2.1.2. 0,06. 8 
Board An- | 
= 7. LE 
a) 
El. 
BB ® 





Nelcher Stein 


10 CLS5 

20 COLOUR? 
SO FRINTEO . " MERSEEEBSEREEEETENBEEEE HEREIN ESEERENDEESERIREEESETEERLSHTESEEERSERRSEHEREGEEER, '' 
40 PRINT" a % 
S0 COLDUR? 

a0 FRINTEZET: " AUE EEE d A A ae u A 


70 PRINT" m u a DB 217. Bm ww" 
80 PRINT" Bi B am a 2a SS oma m 
90 PRINT" —— u EM EM um 0 HE u BER 
100 PRINT" mm mm OB O E BHBB ww" 
110 PRINT" au mw ua BB aan 
120 PRINT" AUT Wr BEER r r rvrrrr m" 
130 FRINTESBA: "von U.Groke 51& Dueren" 

140 PRINT@B06: "Anleituns = A — Spielen = $" 


150 COLOURZ:PRINT@BBO: "WS N: 
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i60 FRINT" % : 
170 FORI=80T0840 STEF4U 
150 ELISE 
190 NEX 
ZOO NEE UB2190: Pellb: GOSURZ1Y0: F=805: G05URBZ1970:F=B35:G6D5SUE 
21970 i 
z10 B$=INKEYS: IFR$= "N THENZ 
220 IFR$S="S"THEN 400% 
230 IFR$="A”’THEN 250 5; 
240 G50TOZ1O 
250 CLS 

zZö0 COLOURS: PRINTTAR (13) "Spielanwei suns" 
270 COLOUR7FSFRINTTAR(LS N! 





Z80 COLOURE 

z70 FRINT:’FRINT"Beim Solikairspiel sollen moeslichst viele Fiauren 
durch Uebersprinsen selcescht werden. Nach 
dem Endzus soll die letzte Fisur im Zentrum stehen." 

Z00 FRINT:FRINT"Mit den: Ffeiltästen brinst man den Markierunsspre 
il auf die anzuwaehlende Fisur, drusckt die Leertaste, und sibt 
mit den Ffeiltasten die Spruns- richtuns an. 


310 P=696:G605UB2930:P=599:60SUB29F0:F=702: G0SURBFIEO0 
20 COLDUR&: FRINT&@737,"D0" 

330 COLOURS:FRINTE7TAORNEN 
>40 COLOUR7: FRINT@SIS:E 
550 COLDOURS:FRINTEIZO 
Sö0 GOLDUR7: FRINTEITS. "We 
>70 B$S=INKEY$: IFES=""THE 
80 IFES=e"W"THENAOO 
390 GOTGF7O 

400 COLDURZ:GOSURZ680: 
410 DIM S(77).»Ft77 
A) RORAS LUG: FORY=1T07 
A230 Kil=eX#r1lOrYsREADAF REABEB 
440 FIX DR 5Stkl)=B Be 
450 IF A=1 THEN 470 Br 
A460 F=FiX1)-41% GOSUB2FFO 

470 NEXTY=X 

ABO FORI=1T07 

490 READASREADEB: READC: READD 

500 FRINT@A: CHRS$ (129) sFRINTER CHR$ (132) :FRINT@C: CHR$ (174) :FRINTED; CHR®$ 
(1313 

S10 NEXTI ; 

520 COLDURS:FRINTE4. CHRS$ (172): EHRS$ (LTZI FCHRS$ (172) SCHRS (17) 5 CHR$ (172) 
5:0 COLOURZ: PRINTEAG "BR" :CHR$ (161): CHRS$ (162) 

540 FRINT@IO.CHRSCIATISECHRS I 1&SA) 

=u0 GCOLOURS:=FRINTEIZ ‚CHRS$ (165) 

Sau FRINTES2, CHR$ (171) 3 CHRE (171) 5 ECHRSII17I)ISCHR$ 171) SCHR$ (171) 

370 COLUURZ:FRINT®SS> ‚CHR >) S CHRS (157) EN: FRINT@109» CHR$ (15N:C 
HR$ (180) a a 

380 COLDURF:FRINT@LIOB, CHRS 
570 COLDURZ : PRINT@762, CHRS$ ( 
25 CHRS (146) SCHRS (1475 ; 

500 FRINTET7IBS CHR$L7ORS FRINTESS 7: CHR$C1S 2) SCHRS (15): PRINT@ST7:CHRS$ (1 
54) > CHR$ (155) 

&i0 FORI=1TO4 ren 

sro nn READER! F= Ai BOSUB20705 Pa Bi GOSUB2150 
630 XTI 
640 u iT08 

6450 Bea P=At GOSUB2190 

Bau ATI 









515" "SCHR$(255)4" "SCHR$ (255) 
m © 0; 










170) PRINT&BO2- CHRS (144) SCHRS 145) SPRINTEB4 


























30 G 


870 
f=1 216) 
870 
700 
710 
7TEO 
730 
740 
750 
7860 
770 
730 
770 
300 
gl1o 
BEO 
3:0 
840 
350 
Bao 
370 
850 
890 
70 
710 
IZO 
FIEO 
740 
50 
27-18) 
770 
780 
9970 
1000 
1010 
IOZO 
1030 
10640 
1050 
1080 
1070 
1080 
1090 
1100 
1110 
1120 
Ii130 
1140 
1150 
1180 
255) 
1170 
1180 
1190 
1200 
1210 
1220 
12350 
1240 


1250 





ENIE DATA 
EDLOURT: FRINTESS2 1m nem} 
COLGOURSSFRINTEIT, "——  Solitair ——" 
FORI=11T077 
IF F(iD=1 THEN 730 


COLOURS 
IF SiID=7 THEN FRINTEF(TD). "We 
NEXTI 
GOT0O770 
FORJ=1 TOSO:NEXTIEFLAYIL>1»1>0) 
FORJ=1T050:NEXTI:RETURN 
CBLOURSSFRINTEIFZO,." # # Spielen = 5 # # Vorfuehren = V # #": 
AS=INHEYS$S IFA$=""THEN?7BO 
IFA$="S" THENSZO 
IFA$="V'’THENIASO 
GOTDO7SO 
L=4,0:1X=Zü:Y=il 
COLOURZ:FRINTEELZ: ZEFRINTERES: ZGOTD1450 
COLOUR2F:FRINTBEIZO, " welcher Stein 7 "; 
M=FEEK (17408+L) 
COLOUR7:FRINTEL . CHRS$ (251) 
A=FEEK (-1954) 
IFAANDSö4 THEN IFX<29 THEN KX=X-+ 
IFAANDZZE THEN IFX>11 THEN K= 
IFAANDIO THEN IFY£2O THEN Y= 
IFAANDS THEN IFYHZ THEN Y=Y-1 
IF M=230 THEN COLDURS: GOTOYSO 
IF M=158 THEN COLOURF:GOTDFIAO 
IF M=165 THEN COLDURF:GOTOF&O 
COLOURZ 
FRINTEL » CHRS {M) 
IFAANDIES THEN 1000 
L=-Yr40rX 
GOTO 850 
I1=0:FORI=11T077 LÄYRFTEER 
IF FiID)=L THEN Fel: Is Sit? ‚Ii= Fi Rene 
NEXTI : 2 
IF Ii=58 THENSSO 
IF StF}=2 THEN 1060 
GOTOSSO 
F2=F-INT(F/1IO) #10 
IF F-Z0£1l THEN 1090 
IF 5S(F-i0o)=2 AND S{F-Z6)=1 THEN 1160 
IF F+20:77 THEN 1110 
IF S{F+ri0)=2 AND S{F+26)=1 THEN 1160 
IF FE-ZXl THEN 1130 
IF S{F-1)=2 AND 5(F-z2)=1 THEN 1160 
IF F£rZ:7 THEN 850 





IF S{Fri)=2 AND S(F+r2)=1 THEN 1160 
GOTOSSO 
COLOURZ:SFRINTEIZO, Welche Richtunse."!SCHR$ (ZEE) 3" "SCHRSA 


s" MSCHR$(Z51)5" "SCHRSARTTDI 5 
EDLDURS:FRINTEL, "OD" 

BOSUR 2030 
A=FEERI-1784) 

IFAANDSS THEN B=ei:Fl1=1:50T01280 

IFAANDSE THEN B=-1:F1=-1:60T01280 
IFAANDIS THEN B=40:F1=10:60T01300 
IFAANDS THEN B=-40:Fl=-10550TD01220 
IFAANDI THEN COLOURS:FRINTEL. "@":GOTO8SZ0 
GOTD1IYO 


EEENETELTRTEN SEELEN 
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1260 IF F2+r2>7 THEN 1190 

1270 GOTO1FEO 

1280 IF FZ-ZXl THEN 1190 

1290 GOTOILZEO 

1300 IF F+r20>77 THEN 1190 

1310 GOTOISSO 

1320 IF F-20X1 THEN 1190 

1220 IF S(F+Fl)=Z AND S(Frz#Fl)=t THEN: 1350 

1240 GOTO 1190 

1350 ArfıCseF+Z#r 1: GOSUR1970:GOSUEB1700 

1360 5(F)J=l55(F+Fl)=1:3S(F+z4Fl)=Z2 

1370 L=Fifrz#F1)5 Y= INT (L/40) ıXR=L- (Y+40) 

1280 Z=Z-1 

1390 GOTOSIO 

1400 IF 5(44)=2 ae ECLOURS:FRINTEYZO: "Du hast'es seschafft. nochein 
mal = N"5:60T0142 

1410 COLDUR7: ER die richtise Endeosition. Nochm.=N": 
1420 B$=1INKEY$: IFRs=""THENI42O 

1430 IFB$="N"THEN RUN4OO 

1440 G0TO1420 

1450 F=10 

14680 IF Z=1 THEN 1400 

1470 F=F+Hl21IFF=77THENI1610 | 

1480 IF FiF5=1 THEN 1600 

1490 IF 5S(F}=Z THEN 1510 

1500 GOTO 1470 

1510 FE=F-INT(F/10) #10 

1520 IF F-2021 THEN 1540 

1530 IF StF-10O)=Z AND SIF-ZÖ)=1 THEN 840 
1540 IF F+r20:77 THEN 1560 

1550 IF S(F+l0)=2 AND 5S(F+rzZöo)=1 THEN 840 
1560 IF FZ-Z£1l THEN 1580 

15370 IF S(tF-U)=2 AND 5S{F-Z)=1 THEN 840 
1580 IF F2+257 THEN 1800 

1590 IF S{tFrl)=2 AND S(Fr2)=1 THEN 840 
1800 GOTO 1470 

16810 COLOURS 

1520 F=729: G05SURZ190:F=750:G0SURZ190O 
158530 FRINTEFZO:"Du hast es nicht seschafft mit"s 28° a": 
1640 GOTO 1640 BEREET 
1650 FRINTEIEZO," Vorfuehren EEE 18 
1850 COLOURS:FORJ=1TOFI SERSREL 
15870 READA:READE:SREADC 

1680 Ei=0 

1490 GOSURZO80:505UB1700:50TO1820 

1700 FORI=F(A)TOFtOISTEFE 

1710 COLCURS 

1720 M=FEEK (17408+T) 1 PRINTEL; "sw" 

1720 FORJL1=1TOZS: NEXTIL 

1740 IF M=230 THEN M=32:60T0 17706 

1750 IF M=235 THEN M=32:60T01770 

1760 IF M=32 THEN M=230 

1770 IF M=ZI0 THEN COLOURS:GOTOL7970 

1780 COLOURZ 

1790 FRINT@I»CHRS$ (M) 

1800 NEXTI 

1810 RETURN 

1820 FORJ1=1TG50: NEKXTIA 

1850 FRINTER(O) "Ye" 

1840 NEXTJI 
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1850 
1850 
1870 
1880 
18970 
1900 
1910 
1920 


RUNA4OO 

FORT1=4T05 

FORT2=1T07 

PLAY (1: TI> TE> IR) PLAY (2: T1:5» 15) 
NEXTT2, TA 

PLAYt1»1>1»O) :FLAY(2,1:1:0) 
RETURN 


SDUNDd»30:50UND 7, 7:5DUND 8, 158:50UND 9:18°50UND 10,.18:SOUND 12,16 


:50UND 13>0 


1930 
19740 
1950 
19760 
1970 
1980 
1970 
Z000 
zZ010 
ZORO 
ZOSO 
2040 
2050 
ZO&O 


z070 
ZOBO 
2090 
zZ100 
zZ1r10 
2120 
130 
2140 
2150 
2160 
=Z170 
2180 
z190 
2200 
ZZ1O 
ZZRO 
2ESO 
2240 
2250 
2280 
2270 
2280 
ZRIO 
ZIOO 
2310 
ZERO 
2330 
2340 
2350 
2380 
2370 
2380 
23970 


FLAY{1-9>9:13) 
FORTT=1T05:NEXTTT 
FLAY{1:1:»1:0) 
RETURN 
FLAY(1:5:7:12) 
PLAY (2>6:1»15) 
FLY 6:35:19) 
FORTT=1ITO20: NEXTTT 


PLAY(1>1> 150): FLAY(Z>1»1>O)S5FLAY(3>1>1»0) 


RETURN 


FORTA=ZTOS:FLAY (1:5: TA» DI SFLAYCE> 6» TA» LI) ENEXTTA 


FPLAY(1»1:1:0):FPLAY(2:1:»15»0) 
RETURN 


LI=RND (5) +3: U2=U1-1:U8=U1-2: FORU4=15STOLSTER-1:PLAY(1:U1»2»U4) PLA 
Y(2>U2>1> UA) Ss FLAY (> UF»1:U4) EFORUS=1TOB: NEXTUS> U4AEFLAY(1>1>1> OÖ) EFLAY(Z 
»1>1, 


O)SFLAY(T»1»1>0) RETURN 

FRINTAF, CHR$ (148) SCHR$ (1A) su" 
PRINTEF+40, CHR$ (150) SCHR$ (151) 
FRINT&EF+BO: "EB": PRINTEF+120, "m" 
FRINT&F+180. CHR$ (144) 1CHR$ (145) 
PRINTEF+200 > CHRS$ (146) SCHRS (1ATI SF" 
RETURN 


COLOUR2:PRINTEF- "BR": CHR$ (141) 5 CHR$ (142) 


FRINTEP+42: CHR$ (140) Ss CHR$ (149) 
FRINTEF+83: "BE PRINTEF+1ZI, "ER" 
PRINTEF+152, CHR$ (152) 5CHR$ (15T 
PRINTEF+200: "EEE" SCHR$ (LSA) SCHR$(1ST) 
RETURN 
CDLOURSSFRINTEF; CHR$ (166) SCHR$ (1679 
PRINTEP+40, CHR$ (188) ECHRS$ (169) 
RETURN 

DATAOOO; 000, 000: 000, 000 001, 003, 004 
DATAO0O: 000: 000; 000, 128; 129: 000: 000 
DATA000: 000 000; 000; 000: 128; 064: 052 
DATAO04; 008; 008: 008. 008 008: 008: 004 
DATAOTZ: 016:016:016:0158>018: 016; 032 
DATAOO4. 002: 001: 000, 000; 000, 000: 000 
DATAO00;, 000,129; 126; 000, 000, 000, 000 
DATAOF32, 064: 128: 000 , 000; 000; 000: 000 
DATAO24; 024,024; 024, 126» 129; 000: 000 
DATA004. 008; 008: 248, 248: 008; 008,004 
DATAOS2: 018: 016: 051: 031016; 016. 032 
DATAOOO, 000: 129: 126: 024 024: 024,024 
DATA2ZSS: 063: 015> 007, 0035003; 001: 001 
DATA224, 252» 239 290: 299: 290: 2595 259 
DATAOOO, 000, 000; 192, 224, 240. 248, 248 
DATA2SE: 252: 294: 254, 234: 255. 2599: 255 
DATA2SS: 255: 255: 127.127; 12750635: 063 
DATAO00; 000; 000: 128.128» 192: 224 248 
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(ERRETEEE BERBIABESEEREILOL TREE a a ERBETEN EEE ELSE Bea EEE tiere. 


2400 DATAOS1, 0531:015:007, 0035 000: 000, 000 
2410 DATA23S: 255: 255: 259. 255: 295: 063: 007 
2420 DATAOOO: 000. 000, 0053: 007: 015: 031: 051 
2430 DATAO07: 0653. 255, 255, 255, 255. 255, 255 
2440 DATAO63: 063: 127: 127: 12722909» 259 259 
2450 DATAZ48: 224,192: 1285 128: 000: 000: 000 
2450 DATAO0O, 000: 000; 001: 001300535 007: 031 
2470 DATA255; 255, 255, 254, 2545254, 252.252 
2480 DATAZSS: 255: 255 2305 29952995 298: 224 
2490 DATAZ48: 248: 240: 224: 1923000; 000: 000 
Z500 DATAOO0> 000 , 000, 001: 003; 007; 015: O31 
2510 DATAO31: 127: 255; 143, 143; 255, 255, 255 
2320 DATAOS1:083, 115: 178.008; 017: 035; 068 
2530 DATA2SS: 255: 248: 22451923128» 000; 000 
2530 DATAZ4O: 000; 000; 0003. 00030003 000; 000 
2550 DATA2S2> 2555 25959: 241: 2413 25959: 259: 259 
25360 DATAO0O:000: 192: 224240; 248: 248, 252 
2570 DATAO1S5> 000, 000: 0000093. 000 » 000 » 000 
2590 DATAZSS: 127031: 00750053 0015000, 000 
2590 DATA2S2» 142: 066: 033r144>.1356: 196: 098 
2610 DATA131»195:192:192:128;:128, 142.255 
2620 DATAZSS: 1130010015003: 0035 195: 193 
2630 DATA255>142:128;128; 192, 192-195» 131 
2640 DATAO24: 024.024: 060:.060:060: 126-126 
2650 DATAOOS: 014,028: 060; 120; 120: 248; 248 
2660 DATA192: 112: 056: 080, 030, 030: 0351:051 
2670 DATAO688: 000: 0585004:080,068 > 0580: 000 
26580 CHARZ: RESTORE: FORAZ=&HFAOOTDAHFSAF  READBYA: POKEA%» BANEXT: RETURN 
2690 DATA1:5:1:5>:97:2:1005 2: 105: 2» 15595155 

2700 DATA1:S5>1>5> 217225 2203 232235: 2:19» 1>9 

2710 DATAFSF1: 2: 724,2: 337523240: 2: 2425 2: 346» 25 349.2 
2720 DATA4S1, 2: 454: 2: 457: 25460: 1: 4635 25 466: 2: 469» 2 
2730 DATAS71>2:9743 2577: 2: 580: 2: 585: 2: 5868: 2:589:2 
2740 DATA1:3:1:955:6975:2: 7005237055 2: 1:5, 1>5 

2750 DATA1-5:1:5:817: 2: 820» 25823» 2>1>5>»1»5 

2760 DATA291,104; 629: 816: 294, 224: 626 696 

2770 DATAS7 350: 8653:570: 60: 4705 860 » 450 

2790 DATA6S3: 570, 857: 370, 306: 704, 614: 216 

27970 DATAS09:824,611:96 

2800 DATA42; 244, 442: 6&44:673: 475: 27375 

2810 DATA124, 224: 524: 724.755:3599; 359; 155 

2820 DATA42: 01:44, 63: 740: 43:51: 01:53 ö 

2830 DATAS31>40:591: 43:40:63: 73:40:53 

2840 DATAS4> u Ss 51 > ol a Sa 36:71:54 

2850 DATASS: 015595 74: 40: 54: 54:01:56 

2860 DATA7S: +40: 555 565-1: 34: 36» 40:56 

2870 DATAS7+-1: 55537: 40:57:54:01,56 

2880 DATAS7 > -1 a Ir >45 oil a S6> Sr -40; 35 

2870 DATAZS>-1:34: 15,40, 35:34, 01,36 

2900 DATAS2: 01; 34: 13540. 33: 33:01»35 

29710 DATA14:40: 34:44, 40:24, 36» 1234 

2920 DATA24: 40,44 

2930 COLOURZ:PRINTEP. CHR$ (128) 3 CHR$ (136) 5 CHRS$ (150) 
2940 FRINTEF+40: CHR$ (137)53" "SCHR$ (1IB) 

2950 PRINT@EP+BO. CHR$ (LFI SCHR$ (139) 5 CHR$ (135) 

2960 RETURN 

2970 FORI=OTOSO4 FRINTE@I:#10, (128+1) 3CHR$ {128+I) ANEXTI 





| 
' 
M 
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Walter Christ 


TEXEDIT 


Mit Texedit können Sie Texte bis 
zu einer Länge von 300 Zeilen ver- 
arbeiten. Es wird jedoch empfoh- 
len, längere Texte in mehrere ein- 
zeine Passagen zu gliedern, da bei 
längeren Texten durch die Garba- 
ge Collection kurze Eingabepausen 
entstehen können. Es handelt sich 
bei Texedit um ein Programm, daß 
aus mehreren Modulen besteht, 
die über ein Menue gesteuert wer- 
den. Diese Funktionen werden 
jetzt im einzelnen erklärt, 
Eröffnen einer neuen 
Textdatei 

Diese Funktion wird durch A’ 
vom Hauptmenue aus angewählt. 
Nach drücken einer Taste wird der 


‚Bildschirm gelöscht und man kann 


mit der Eingabe beginnen. Es ste- 
hen dem Benutzer drei Modi zur 
Verfügung. Der Modus in dem Sie 
sich befinden steht in der letzten 
Zeile. Rechts unten wird außer- 


dem noch die Zeilennummer (z.B. 


L = 25) der letzten Bildschirmzei- 
le angegeben. Sie befinden sich 
jetzt im Schreibmodus und kön- 
nen beginnen Ihre Texte einzu- 
geben. 
Schreipmodus 

Durch drücken der Taste (Pfeil- 
nach links) können Sie den Cur- 
sor um eine Stelle zurück bewe- 


gen. Durch drücken der NEW- 


LINE {ENTER} Taste geht der 
Cursor auf den Anfang der näch- 
sten Textzeile. Durch drücken der 
Taste (Pfeil nach rechts) — min- 
destens drei Sekunden! — wird der 
Text in den Hauptspeicher ge- 
schrieben und verarbeitet. Danach 
kehrt das Programm zum Haupt- 
menue zurück, dieser Vorgang be- 


nötigt etwa zwei Sekunden. Durch 


drücken der Taste (Pfeil nach un- 
ten) kommen Sie in den Cursor- 
modus. 
Cursormodus 

Sie können jetzt mit den vier Pfeil- 
tasten den Cursor über den Bild- 
schirm bewegen. Durch drücken 
der 'Z' Taste kommen Sie in den 


Die fast GESCHÄFTSFÄHIGE TEXTVERARBEITUNG 
für GENIE 1, I, TRS80 M 1undM3, 


unter NEWDOS 80. 


Schreibmodus zurück. Hierbei 
geht der Cursor wieder auf seine 
alte Position. 
Durch drücken der (Print At) Ta- 
ste kommen Sie in den Editmo- 
dus. 
Editmodus 

Der Cursor bleibt auf der selben 
Stelle wie im Cursormodus. Jetzt 
können Sie den alten Text einfach 
überschreiben. (Pfeil nach links) 
bewegt den Cursor eine Stelle zu- 
rück. Shift und (Pfeil nach rechts) 
bewegt den Rest der Zeile um eine 
Stelle nach rechts. Shift und {Pfeil 
nach links) bewegt den Rest der 
Zeile um eine Stelle nach links. 
Hierbei wird jeweils ein Zeichen 
zerstört. (Pfeil nach rechts) be- 
wirkt einen Rücksprung in den 
Schreibmodus. Der Cursor springt 
wieder auf seine alte Stelle. 
(Print At) bewirkt einen Rück- 
sprung in den Cursormodus. Auch 
hier geht der Cursor wieder an sei- 
ne alte Stelle. Der Text kann nur 
aus dem Schreibmodus an den 
Hauptspeicher übergeben werden. 

Umlaute können folgendermas- 
sen angewähit werden: 
drücken Sie die Clear Taste und 


danach den entsprechenden Buch- . 
staben (a,u,0,5,.A,U,0). Auf.dem. 


Bildschirm ‚wird: dann. der ent- 
sprechende Umlaut... dargestellt. 
Zur Steuerung von Schriftarten, 
Leerzeichen und ‚Drucker stehen 
noch vier weitere Steuerzeichen 
zur Verfügung. 

Steuerung der Schriftarten 
Jede Textzeile, der kein Steuer- 
zeichen voransteht, wird in Nor- 
malschrift ausgegeben. Soll eine 
Textzeile in Breitschrift ausgege- 
ben werden, so ist ihr ein {Print 
At) voranzustellen. Hierbei ist zu 
beachten, daß bei Texten, die in 
64 Zeichen pro Zeile ausgedruckt 
werden sollen, nur die nächsten. 
32 Zeichen beachtet werden (bei 
80 Zeichen pro Zeile nur 40 Zei- 
chen). Die restlichen Zeichen wer- 
den nicht verarbeitet. Um eine 


Zuerst. 


Zeile in Proportionalschrift auszu- 
drucken ist ihr ein (Pfeil nach 
oben} voranzusetzen. Beachten 
Sie, daß bei Proportionalschrift 
ein kleinerer. Zeilenvorschub statt- 
findet. Achtung: Diese Steuerzei- 
chen gelten nur für eine Textzei- 
le. Wird an den Anfang einer Text- 
zeile ein Shift und (Pfeil nach un- 
ten) gesetzt, so hält der Drucker 
hier an. und gibt Ihnen die Mög- 
lichkeit, den nächsten Blattanfang 
zu positionieren. 

Für Texte die auf 80 Zeichen pro 
Zeile formatiert werden sollen, 
steht noch...ein weiteres Steuer- 
zeichen zur Verfügung: Shift und 
(Pfeil nach oben). 

Steht dieses. Zeichen am. Anfang 
einer Zeile, so. wird.in.den Text 
nach dem formatieren eine Leer- 
zeile eingefügt. Dieses Zeichen an 
das Ende eines Satzes gesetzt, be- 
wirkt, daß hier-...nach. dem 
formatieren die Zeile’ zu Ende ist. 

Um in..den! .Text.später be- 
stimmte Daten einzufügen, kön- 
nen diese Stellen. .mit. Shift und 
(Print: At) markiert werden. Näh- 
here Angaben: hierzu finden Sie 
unter "Dateneingabe in Texte’. 
Einlesen eines Textfiles 

von der Diskette 
Wird’ durch ’C’ vom Hauptmenue 
aus angewählt. Auf "Filename?' 
ist der Name der gewünschten 
Textdatei einzugeben. Handelt es 
sich um eine auf 80 Zeichen pro 
Zeile formatierte Textdatei, so ist 
der Zusatz /FOR mit anzugeben. 

Hat man aus Versehen dieses 
Modul gewählt, so kann man 
durch Eingabe von '0’ wieder zum 
Hauptmenue zurückkehren. 

Soli der Text zu einer bereits 
im Speicher vorhandenen Textda- 
tei hinzugeladen werden, so kann 
man dem Filenamen ein '*’ vor- 
anstellen, ansonsten wird der im 
Speicher vorhandene Text ge- - 


‚löscht. Ist die gewünschte Datei . 


nicht auf der Diskette vorhanden, _ 
wird ’File nicht im Directory’. 
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ausgegeben und eine neue Eingabe 
erwartet. Ist der Text fertig einge- 
laden, so kann der Benutzer’durch 
drücken einer Taste wieder in das 
Hauptmenue zurückkehren. 
Achtung: Die Diskette muß im 
Laufwerk liegen, sobald der File- 
name eingegeben wurde! 

Abspeicherung auf Diskette 

Wird durch 'B’ vom Hauptmenue 
aus angewählt. Zuerst testet das 
Programm, ob der noch auf der 
Diskette zur Verfügung stehende 
Speicherplatz ausreicht. Falls dies 
nicht der Fall ist, wird der Benut- 
zer zum Diskettenwechsel aufge- 
fordert. Hierrauf wird nach dem 
Filename der Datei gefragt. Ist ei- 
ne Datei unter dem selben Namen 
bereits vorhanden, wird diese 
selbstständig gelöscht. Der File- 
name muß mindestens zwei, höch- 
stens aber acht Zeichen lang sein. 
Sollte man aus Versehen dieses 
Modul angewählt haben, so kann 
man durch Eingabe von '0’ wieder 
zum Hauptmenue zurückkehren. 
Ist die Textdatei komplett abge- 
speichert, so kehrt das Programm 
selbstständig zum Hauptmenue zu- 
rück. Die Anzahl der Zeilen, so- 
wie der benötigte Speicherplatz 
wird ebenfalls angezeigt. 
Achtung: Bevor das Modul vom 
Hauptmenue aus gestartet wird, 
muß eine Diskette im Laufwerk 
liegen. 

Erweitern einer Textdatei 
Wird durch 'D’ vom Hauptmenue 
aus angewählt. Es wird die jeweils 
im Speicher stehende Textdatei 
verwendet. Sie muß vorher in den 
Speicher geladen werden. Nach 
dem Drücken einer Taste wird die 
jeweilige Textdatei auf dem Bild- 
schirm gelistet {nur die letzten 
15 Zeilen!). Texte die formatiert 
werden sollen, sind in Ihrer un- 
formatierten Version zu laden, 
und dann insgesamt zu formatie- 
ren. Die Texte können dann wie 
bei 'Eröffnen einer neuen Text- 
datei’ weitergeschrieben werden. 

Directory 
Wird durch ’E’ vom Hauptmenue 
aus angewählt. Es werden alle 
auf der Diskette vorhandenen 
Textdateien gelistet. Bei Datei- 
en mit dem Zusatz /FOR handelt 
es sich um bereits auf 80 Zeichen 


pro Zeile formatierte Texte. Dem 
Anwender stehen folgende Mög- 
lichkeiten zur Verfügung: 
1. Rücksprung zum Hauptmenue., 
2. Löschen einer Datei. Es er- 
scheint 'Filename‘, hierauf ist der 
gewünschte Dateiname einzuge- 
ben. Diese Datei wird dann von 
der Diskette gelöscht und das Di- 
rectory wird neu gelistet. Wurde 
aus Versehen 2 gewählt, so kann 
man durch die Eingabe von ’0' 
wieder ins Menue zurückspringen. 
3. Ausgabe der Directory auf den 
Drucker. — Achtung: Drucker 
muß eingeschaltet sein! — Die 
Directory wird in ausführlicher 
Weise auf den Drucker ausgege- 
ben, einschliesslich Anzahl der be- 
nötigten Granulen etc.) 
Achtung. Bei Start des Directory- 
Moduls muß die Diskette im Lauf- 
werk liegen! 

Textformatierung 
Wird durch 'F’ vom Hauptmenue 
aus angewählt. Der jeweilige im 
Speicher stehende Text wird von 
64 auf 80 Zeichen pro Zeile for- 
matiert. Alte und neue Zeilen- 
nummern werden auf dem Bild- 
schirm dargestellt. 
Beachten Sie bitte: Sollen Leer- 
zeilen von dem Quelltext in den 


formatierten Text. übernommen 
werden, so sind diese ‚mit. (Pfeil: 


nach oben) zu versehen. Näheres 


siehe unter 'Eröffnen einer Text- 


datei... 2 2000 00 02 
Listen eines Textes 
Wird durch "G‘ vom Hauptmenue 
aus angewählt.' Es wird: der sich im 
Speicher’ befindliche Text gelistet. 
Pro Tastendruck wird jeweils eine 
weitere Zeile gelistet. Autorepeat 


ist hierbei möglich. Bei bereits auf 
80 Zeichen pro Zeile formatier- 


ten Texten benötigt jede Textzei- 
le zwei Bildschirmzeilen (sofern 
keine Leerzeilen). Die zweite Zei- 
le wird hierbei nur zu einem Drit- 
tel benutzt. Das Listen kann durch 
drücken der ’0’ Taste abgebrochen 
werden, das Programm springt 
dann wieder in das Hauptmenue. 
Nach dem Listen des gesamten 
Textes erscheint die Meldung 
"Textende’ und “Taste drücken’, 
hierdurch kehrt man wieder in das 
Hauptmenue zurück. 
Druckerausgabe 


Wird durch 'H’ vom Hauptmenue 
aus angewählt. Der im Speicher 
befindliche Text wird auf dem 
Drucker ausgegeben. Geben Sie 
jetzt den Randabstand links ein (0 
bis 16 Zeichen möglich). Jetzt 
wird erfragt, ob der deutsche Zei- 
chensatz verwendet wurde. Eine 
Druckerausgabe mit deutschem 
Zeichensatz dauert länger, da die 
Umlaute erst für den Drucker um-. 
gerechnet werden müssen, denn sie 
sind nicht im ASCII-Code ent- 
halten. Danach können Sie einge- 
ben, :wieviele Kopien Sie haben 
möchten. Gibt man hier eine ’0’ 
ein, so kehrt das Programm zum 
Hauptmenue zurück. 
Systemmenue 
Wird durch ’I’ vom Hauptmenue 
aus angewählt. Diese Funktion ist 
für zukünftige Erweiterungen vor- 
gesehen und bewirkt im Moment 
noch gar nichts, 
Dateneingabe in Texte 

Wird durch ‘J’ vom Hauptmenue 
aus angewählt, Mit diesem Modul 
ist es möglich, Standardtexte zu 
verfassen. Beim..Schreiben von 
Texten können‘. in ‚Textstellen 
Shift und: (Print:At) Zeichen ein- 
gefügt werden. Und zwar so viele 
hintereinander, wie die maximale 
Eingabe betragen ‘kann. Ist ein 
Text:auf.diese’Art und Weise ge- 


schrieben, (z.B: Serienbrief, in 


dem nur. Name. und Datum einge- 


setzt. werden:müssen) so speichert 


man‘ diesen: zuerst ab. Nun kann 
man ..durch anwählen von ’J’ 
Daten:in:: den Text eingeben. 
Das: Modul: durchsucht nun den 


Text nach solchen Stellen. Auf 


dem: Bildschirm erscheint 'Bitte 
warten’. Nach dem die erste Stel- 
le gefunden wurde, erscheint diese 
auf‘ dem Bildschirm sowie eine 
Eingabezeile unten auf dem Bild- 
schirm. Nachdem die Eingabe ab- 
geschlossen wurde, setzt der Com- 
puter diese in den Text. Es wird 
jetzt abgefragt, ob die Eingabe 
korrekt war, und falls ja, weiter- 
gemacht. 
Editor 

Wird durch 'K' vom Hauptmenue 
aus angewählt. Der Editor dient 
zur Überarbeitung von Texten. 
Er ähnelt in seiner Arbeitsweise 
dem Screen-Editor bei der Ein- 


ann ser 
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gabe von Texten, nur das es kei- 
nen "Schreibmodus’ gibt. 

Der Text erscheint auf dem 
Bildschirm (die ersten 15 Zeilen) 
sowie ein Cursor links oben. Sie 
befinden sich jetzt in dem ’Cur- 
sormodus’. Sie haben nun folgen- 
de Möglichkeiten: 

Die vier Pfeiltasten bewegen den 

Cursor über den Bildschirm. Durch 

drücken von: 

'Y wird eine Leerzeile eingefügt. 

'K' wird eine Zeile gestrichen. 
(Jeweils die Zeile, in der sich 
der Cursor befindet.) 

‘Print At’ 

Übergang in den Eingabe/ 

Editor-Modus. 

Text wird eine Zeile nach 

oben geschoben. Änderungen 

in der obersten Zeile wer- 

den nicht angenommen. 

'ENTER' 

wie 'Z’, nur werden Ände- 

rungen angenommen. 

Text ist fertig überarbeitet. 

Zurück zum Hauptmenue. 


zZ 


’E’ 


Dieser Vorgang: dauert etwa 
10 Sekunden und'wird in der 

2:5: Hier. muß:CHRS(14) durch den je- 
‚naillaen, Steuercode ersetzt wer- 
‚den. 


letzten Zeile angezeigt. 
Eingabe/Editor-Modus 





Sie können nun Eingaben in den. 
Text machen. Ausserdem: stehen 


noch folgende Tastenfun ktionen 
zur Verfügung: 


5 BR 

20 PRINT" 
{2 PRINT # 
23 PRINT “ 
IS FOR 
200 
IQ "TEXEDIT 2,4 
120." (6) 
ISO 


H% 


ISO 
200 CLEARZOOOO 


ses) 


220 
900 


DBEFINT AZ 
MIMXRECHOOS" 
2,20 
9209 
250 
ZO00 
2920 
2020 
ZOZE 


GOSURZIOO 


AMEEINKEYE 










TERXE 


Z2/ IS8E3 
"MALTER CHATSE 
240 "ET7SEZ GOLDBACH 

ORAL AA RE AA AA ATRE RA ACRE AAN RARAEAU A 


"> HIER NOCH VERFUEGRBARE 


HIER MAXIMALE 


ÜNERRORGOTLLZOOO 
USZETRINGECEO, 


(Pfeil nach links) bewegt den Cur- 
sor eine Stelle zurück. (Pfeil nach 
rechts) bewirkt einen Rücksprung 
in den Cursormodus. Shift und 
(Rechtspfeil} oder (Linkspfeil): 
Schiebt den Rest der Zeile nach 
rechts bzw. nach links. 
Druckeranpassungen 

Texedit ist in dieser Version lauf- 
fähig mit einem Seikosha GP80/ 
100 Drucker. Mit folgenden An: 
gaben sollten Sie das Programm 
aber auch an andere Drucker 
anpassen können. 
Die Druckerausgabe befindet sich 
in den Zeilen 8000 bis 8320. Es 
lassen sich vom Text aus drei ver- 
schiedene Schriftarten steuern, 

Normalschrift 
Dies solite eine Schriftart sein, die 
80 Zeichen pro Zeile druckt. Sie 
wird in Zeile 8064 angewählt. 
Hier muß CHR$(15} durch den je- 
weiligen Steuercode ersetzt wer- 
den. 

Breitschrift 
Dies sollte eine Schriftart sein, 


‚die:40 Zeichen. pro: Zeile druckt. 


Sie wird:in Zeile 8062 angewählt. 


"Proportionalschrift 


kann eine beliebige andere 


Schriftart eingesetzt werden. Der 


DET E. 


2) Zr 
Mom 


2" 
Jon 
Ehrist Software” 


=270500:NEATA 
RER ER ER 


vu) 


TREE EEE RR N 
ZTARTMENLE 
TREE RE RER 


SPEICHERGRÜE 


Einsprung befindet sich in Zeile 
8063. Da in der Originalversion 
hier in ein Unterprogramm ge- 
sprungen wird, ist folgendes zu 
beachten: 
Es kann der jeweilige Druckercode 
anstatt 'GOSUB 8500’ eingesetzt 
werden oder 

es kann ein Unterprogramm ab 
Zeile 8500 geschrieben werden, 
das mit RETURN abgeschlossen 
werden muß. Die Randeinstellung 
muß ebenfalls mitprogrammiert 
werden! 

Umlaute 

Da beim Seikosha GP 80/100 die 
Umlaute nicht die selben Codes 
haben wie im Rechner, müssen 
diese vor dem Druck umgewandelt 
werden. Das Programm fragt des- 
halb in Zeile 8027 ob der deutsche 
Zeichensatz verwendet wurde. Das 
hierzu verwendete Uhnterpro- 
gramm steht in Zeile 8300 bis 
8320. Liegen bei Ihrem Drucker 
die Codes wie beim Rechner, dann 
geben Sie bei "Deutscher Zeichen- 
satz verwendet?’ nein ein, und 
können trotzdem die Umlaute ver- 
wenden. Ist dies nicht der Fall, 
können Sie in Zeile 8310 die je- 
weiligen Codes an Ihren Drucker 
anpassen. 


SSE EINSTELLEN 


ZEILENZAHL EINGEBEN” 
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1025 CLS 
2028 PRINT" 
N I 
2029 PRINT” 


„ 


4030 PRINT” 
ZOS#0 PRINT 
2050 PRINT” 
TO50 PRINT” 
2070 PRINT" 
075 PAINT” 
2020 PRINT” 
LOPO PRINT” 
Z219 PRINT” 
LI20 PRINT” 
22330 PRINT” 
2240 PAINT* 
2250 PRINT" 
4200 AR=INE 


“7 
er 





BITTE MAEHLEN SIE »" 

Ausser ERGEFFNEN EINER NEUEN TEÄTDATEL 
R = ABEPEICHERUNG AUF DIEKETTE 
Brass EINLESEN EINES TEXTFILES YON DISKETTE 
Doemeem ERHEITERN EINER TEATDATEI". 
Bon TEXEDIT-DIRECTORY 

Fomemen TERTFERDRMATTERUNG” 

G ----- LIETEN EINES TEXTES 

H oemuun DRUCKERRÜSGARE” 

er SYSTEH-MENUE" 

esse DATENEINGARE. IN: TEXTE” 

K.-- re. EDITOR" Sn. 


EYSEIFARS"TTHENZ2OO 0. 


2205 IFASCCREIPPYSTHENBESCHRECASCCREI- 


2206 
1210 


TEBEZCL 


.IO00,. „23000 
2000 
2020 
2020 


2 


2030 


” 


TEAT 
CL: 

PR IN 7 u 
INBARE: FAs 
2IIO AB=IN 
27: RZe) EL: my 


BNBSCÜARI-EHIGUTÜZOOO, 


MEYPRSTIEPEERCLS 
PRINTSPGO, 


NEIHSIRAZCCHTPISFSTHENZ 200° 


4200,3500,13000,65000,20500,7200,2000,20 


RUE ERITREA EEE EEE RE 


EINGABE 


TERN EEE TE FAERIRERRRRRRRERTER RER HEREIN 


DT Te 


TEXTEINGRARB 
RINTZPRINT”REGINN DER £ 


an m m nn en m rue ma ar dt me m ren 


E"ZPRINT" 


Fr nme nu a nn m me mn rn am mn mn am Ye 
. 


TE DRUECKEN 
SPLDFOTHENZLIO 


"SETSETSETSETSETSETSETSETSETS NETBETSETSETSETSETSETSETSETSETSETSETS 


ETSETZETSET 
SETSET L 
2i22 PRINTZ 
2222 FORA=O 
2125 Also 

2230 
2195 
2296 
2200 
2202 
2202 
2220 
2215 
32:60r702210 


POKER, 


Tea ptitgt 


” 


° RE At RE ZL 


2220 IFASCCRBWPIKFTORBSCCHE) = 


2230 PNKEX 


RE=INKEYERIFAB= 
IFBSCCARISSANDASZSISOTHENXSÄ- ZEPOKEN,ZIIEPOREX+] 


BETZ mt ETSETSETBETRBETBETSETBETSET 
15 SETSETSETSETSETSETSETSETSETSET"; 

Pas, tn SCHRE IRMODUS #, 

TOZZOSKECHIS""2NEXTO 


X 


A=25I50 


I32 


RAE=INKEYE 
AEAACA AT RER ARE AU E A IE Ada 
EINGABE 


AA RE AARAU ANA ALLE BER ARE RE 
"HTHENZ2IO 


wire 
‚IE 


POKEXFZ, 
VLORRSCCAEISIHTHENZSOO 


„RECCHEIEPÜORERFL SIE RFAF LE TERPISSZETHENGOSUAZEQOOS Km 2 


:ENTOZZ2IOELSELLIO 


” 


2 SOO 

2520 
2520 
2522 
DE 7 
2325 
2524 
yo 


" AEND 


eu 


TFRSCE 


IFRECK 


Ü 
y 


87) 


TFASCK 
POKEN, 
TE AS 


I un 

Ina 
Sr 
[05 


) 


> 


ZFRSCKCRE) 


FERRRÄRERRRRRRR RER RER RARE RER NEEEE 


ERUNGEN IM SCHREITRMDDUE 


RR 


AEIEPLITHENAFSCHASKLSSIEGOTOZUIO 
SIT THENABSCHRECPIF):GOTÜ22IO 


Zu/ 
ARIERGTHENAESCHRELIZFIEGEOTOZZEO 


ZFBSCCBEISPSTHENRESCHRECIPZISGUTOAZIO 


APPESITHENGOEURA2GOOLGATUFZZSO 


372 


GCAPPFZSTHENZFOO 





VREERENESER 


DER 








EEE EEE Er EEE GEEERESTEEEE ER. 


2540 
2550 
2600 
2505 


Fr 


1520 
2620 
2EJO 
fr 2 


AAECHIEIFLUNECHIEHE, 


nn 
-; e 


3073 
3074 





S2:0nR(109=-ar 0200 
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IF ASCKARI=IOTHENTOOO 
TEPEERÜLSHOOIFEATHENZEIOELBELLIO 
ABSINKEYEIIFOS=""THENDEOO 
TERECCHES=ZITHENDEOO 
IFASCCHEIS=ESTHENDRSCHRECHEN 
TERSCCHEISFSTHENDLSCHRECHT ) 
IFBSCCRRISSSTHENAES SCHRECSEN 
TERECCHEISOFTHENDESCHRECEZ 
IFASCCBEISZIIITHENDES CHRECZEAD 

TIERECCHR IE AR 

IFBECCAR)=I75 'THENAS= TEHRACHE 

RETURN |) 

OR EREAEEORE RE EA RER AL IE Re Kr IR REIFEN 
" NEBH=-LINE TASTE ELLENGORZOHUR 

= ee eessskiese, 
ASCINTCCH- ISEBONIFESDRLENEEAFLSTBON 

IE X>26II9ENSUR 2800 

PÜRER IEIEEOTO22IO 

en nr 

"AILDECHIRM NAC EN SCHIEBEN 

Ra | | 
KEdlyet“ Be 
TSVARFTRCYURDE PCR, : 
TEUPZEZOTMENPRIN: 
GISUIRISENSURES: 






















4 SPOKRET#Z,OLPOKET+Z  RHIETKECHTI=UR 
BEICHER VOLL? :GOTOSLORO 
TSSSPOKEN ZILEPRINTSIOOS  ALIHI5:" "rTRE 


MR=Q: nImanzc22) 








JS2SIEEMAZCH)SOLAURZCH)=1SE7 
BES EAAKCH De PTR OTUALCH 
= 15I51:QURRCIZI=I08I 
EHAKC LEE PIOOF ERNANNT NN 
LCIO)= 15936: RALL2O)=- 13026: UN] (225250 


F2:RRL(EI=LI: 
ET EAHADED Hr 


Nö 
2 





TEXT EDITIEREN BE | 
"READER AA RC ACAE AERER REAL AERCRER AL AA EA AA Ara at 

PRINTSUGF ," N  EURSORNODUE Ü=-SEFSETSETT: 

LEN Ba 

TFPEERC IAHOOISTTANDX >15ISOTHENK= =a-/ 
TEREERCLTSAIONNESHANDÄASIESEITBENNE NT 2 
IFPEERCLIEOQOY=ZIEANDANSIEFITG-EITHENNSENFG I 
TEPEEKCLSMOONSZANDASLSSSOHGEHTNENNE Ze 
IFPEEKRCHISFSISATHENPOKEE  IEXR=SLLSIPOKEX 231: PRINTS® ter BCH 
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J30rs 
SORO 
F09O 
3200 
JE Mr 20 
ZEO0 
3307 
2F07 
J3I0SE 


23.20 





IFPEERKL24IITI=SITHENIIOO 

POKE EL... 

I=SPEEKÜXDSESÄ 

PÜKEN LFD: 

BOTH ZOO 
TOREAUAUAEALAL AREA RER NER AL AA AA IRA AUdE At 
"TEXNTRENDERN 

TORERAR AARAU RE RER RER RER NEA SE BEE JE RE RE 
PRINTSSEF,"-- > ERITMODUS S--BETSETSET", 
BE=-INKEYE m 
PÜUKEX, 292 
ME=SINKEYREIFAR=""TNENSSZO 
IFBSCCHEISSETHENARSCHRECISTI 
TEASCCAES=IETHENDSSCHRECFIED 
IFBECCAEI=SIITHENGOSURZEOO 





40. GENIE DATA 
RENATE TESTSEITE Sa a EEE EEE SEES DEE ET EEE SEE ERNEST DEE EEE EEE Tanga 


2230 TERSCCHTPSRSTNENGORURESOOSGOTO St F 

IIIO ZFASCCARI= ZITHENGOSURS EOO:GUTOSSET 

SIEH TERZCCHESFETNENPOKER, T:A#rkm 3 Te PEE KCHIERUTOTEZF 
3I4T IFRECCREISSTHENPOREN IEÄ=LLEPOKEX 23: PRINTSERJ "=> SCHREIR 
MIIDERE Non tr FORY=ITOZOO: NE ATEDB=INKEYSBSGNTOSINLO 

II4F IFASECHPEISETTHENABRSCHRECHHF) 

wEss POREN.T 

3390 IFAB="8"THENPRINFSP2EF,"-- 5 EDITHOBUE SN--SE Fade EFYLEGOTOZOFO 
EE7O PURE, ASCHE IEAFTÄFLTE TH PEERÜXRSEGOTOSS ELF 

IEOO TRETEN ER A NEE EN 

3502 "ZEILE NACH RECHTE 

JO RR RER UNE TE TE 

BIO ZERINTCCH-LIEROD FE as SIE 

39320 EFZ=ÄTHE NRETURN 

ZIEO FORYELTIDAZISTER- ZEPOKEY PEERCY- 23 

IS40 NEXTYEPOKEXFSZERE FLERN 

EBOD 7 RRRHTE RA EA AACHEN AAN 

3602 "ZEILE NACH LINES 

ZERO MA AR RA AA A EEE A SE AA A ARE 

3520 ZEINTCCC-ISIEO) /E Ir PIaadr 15359 

3520 TFZ=EATNENRETURN 

3EIO FORTERHTITGI- DEPOKEY PEERCYHED 

Sast0 NEATYZPIKEZ, SS: RETURN 

3200 FORYZITOSFO 

SE2O TFPEERCLHSLOONKTFESTMENZEIO 

3820 NEXFYEGOTIIJOORO 


Le 





AOOO TRRAACH A HERAN EA ARENA ACHERN EA EA MALE 
FOIO "ABSPEICHERN DEE TEXTES 
LOFO RER A AARAU AL AERE BEA IE REAE RAC HE 


JOZZ PRINTSPGF,"-- > TEXT WIRD ABGESPEICHERT ="; 
HOZE Mal 

3925 0=0 

HOEO VL STEOFKELAIENN Bi 

040. TFVRRPTRIVEIEPOKET „EJSTTSINFOWIZERDET Ye Y- TIn236r REKRET#ITYEP 
MEETFETTERPCHISUE 

JOSEO IFAPYTHENYzYrEJEA=FNF LE GUTÜAFOIFO 

OST ELSE 

4055 IFA=15SIE0URN=SOTHENG=- 2 

ORO PRINTArLE” TEATZEILEN” 

O6 FORYZITOSOOENEXTY 

OFO GUTDNIZOOO 

PIOO TR 
4270 "AUSGABE AUF DISKETTE nn n 
PIZO TREE 
YSEL B=O 

JEZNEZ CLS 

HERE CMDIFREE" 

F22F FR=ZCHRECPEERCLSHTTIITCHRECPEEKCZSIFTEIIEFSURLCFEDSÜLS 





4EZS PRINT”A BR NS PETCHERUNG af DIE KMFZPNEINT’- 
PRINT . 


4227 PRINTSZIE,Fr" GRANULEN FREI”TSIFFSCH/ISITHENPRINTSSSF "TEXT OP 
AEBET NICHT MERR AUF DIEKETTE”ZPRINTTLEGEN ZIE NEUE BIEKETTE EIN®E 
PRINT"WENN FERTIG TASTE DRUECKEN"ELSEJ2IO 

HaGE DE=INKEYEETENES""THENFERE 

4229 CLEEG0TOI200 

#230 INPUT*FILENAME 7 RN 

4233 IFBE="O"THENZOOO 

HZ IFLENCHRISDTHENCLELEOTORLERS 

4235 IFLENCHEÜOSD=EOTHENBESREHU/FOR"SL=EOELSEL=G4 











. GENIE DATA 41 





ESG KILL BE 

432949 OPEN "R".LI,BE 

ARE HELD DET PENBCHEI et 

4250 FÜRZ=SOTURSTEPI 

J292 BEBHLENCKBCZIIFTLENCKECIHIDIFTLENCKBCZ FE) 

FESS TIFLFEATNEN FIELD 2, GH AZ DE, GE HE ER, GE ME FRELEE FIELD I 
„ER 95 DE,ÄZO BE ER, 80 ABS FF 

HESS KSET DEHFNBCHIELSETERSÄFCHFIDILEBETFRFNECE HZ) 

4250 PUTZ 

J2G] PRINTSF4I3G,Z#3s "„TEXTZEILE BEREITS ABGESPEICHERT"SNEXT 
HRGS GLOSSE 

42597 PRINTSPRINTRE". BYTES” 

3265 PRINTS?7 "O4, "TEXT. KOMPLETT BAGESPEICHEAT” 





Ss 
Ss: 


4256 FÜRY=ITÜZOO:NEXTYZERTNZOOO 
. LHOD ARCHE RR AREA ÄRA AU AEREAEZEAC AA AREA RE 
4510 "EINLESEN VON DATEN YON DISKETTE 
#520 * Bea AURICH HIER EEE HIa 
. 4922 CLS “ / 
4525 PRINT"LE SEN ne INES TEXTFILES WoN m | 
S : TE KTIRRINT en nenn en mn a an na nn rm nn an mn am nn tn m nn mer ann da de un 0 a der Van He nm ne nern m mn an m damen san en 
. a ar ee 4“ i a 
> 4526 B=0:POKESH4130 .&H261 POKESHFZEL „EHRE 











#530 INPUTTETLENANE 2" ;Bx 
4532 IFBR="O"THENZ000 
HSEE TERIGRTLÜRE, 432" /FÜR"TBENL=BOELEEL SCH 

4535 IFLEFTECBE, 2I="R"THENILSOIBE=RIGHTECHE „LENCBEI- ZI OPEN" R" I 
BEIGOTOSLSSOELZEIL=OTEORAL=OTORENECALIE""INEXTAL 

15940 BPEN"R" 2 ,BE BR 

A550 G=LOFCH 
4355 Q=Qr3-4 


4550 FÜRAK- ORILTORFILSTERS 
AS-DE,GF BES ER,64 AS FFELSEFIELD2,SO AS 












JSG IFL=@SATHENFIELDISGF 
DE,ÄBO AI EF, 20 BER 3 
4564 GET Z RINEREREE 

ISTO KECKI=DE: K8ck#235 ER: EKECKRRD= =F$ 

uns PRINTSSZO, Ar: ” STEXTZEILE BEREITS EINGELESEN” 
4597 BSBALENCHBCHIDALENCHBCHTZIDALENCÄECRFED 

390 NEXTA a 
FE00 ECLOSEZPRINT: PRINT"TEXT KOMPLETT EINGELESEN” 

4505 PRINTZSPRINTRz” MYTESH.: 

3520 G=X:PRINT: PRINT"HEITER » TASTE DRUECKEN” 

4520 AF=INKEYE: IFAg=""THENdERO 

JE25 PORESHJLEO,SHSDEPORERH4ZET, SHSB 

AEFEO GOTIZOOO 

SODO 2 

5020 "MEITERVERARREITUNGSVONZSTANDARTENTEN 

SONO TREE EEE RENTE EEE REN EEE RER IC HE 

030 CLE 

S040 PRINTTE ITNG ARE YVELEEN DA-T.E.N. IN DEN TE 
A TPsPRINTETRINGSECHF, ff) 

5050 PRINTSSZ2,"--> BITTENÜNARTEN!X-=-" 

3400 FÜRYSOTAA ANEEBER 

9220 FÜORZ=ITUGE4J EOYSHESEE : 

S2120 IFMIDECKECY) BT PL HENDOSERSSAS 

3230 NEATZ=NEATY 

5240 PRINTS2OO, "EINGABE. BEENDET - TBETE DRUECKEN 

LO ME=INKEYEETE A8=”"TBENSISOELE NELOOO 

GEOO RER RER 

wu20 "EINGABEUNTERRGLTINE 

FIG TRRRRRÄREREI RI RÄT RER RR RER RE E 














RESTE TEEN TE TEEN one Te Te Te TEE OTTO Tee TEEN: 











} 
; 





42 GENIE DATA 





3530 FORTSZTOSAE IEMIDSCHECY)  L.2I=CHRBEIODI TNEN NEÄTT 
590 L=I-Z 
45 PRINTSIZO,” 2: 


5 

550 TEYSSTNENPRINTS2SE RECY- 
550 IFYSZTHENPRINTSSZO.NECY-II: 
S7O TEY>ITBENRRINTSSEHLNECY- 2; 
520 IFYSOTHENPRINTSIJSE,KBCY- 2r 
3590 PRINTSSI2.NRCY: 

3800 PRINTSSTE,ETRINGECEF, 230) 
SEO PRINTESAO.NRCYHLD: 

5620 PRINTSPOO,STRINGECL," "dr" 
5530 PRINTSZOS,” #4 

5540 LINE INPUTAR 

56,50 nn 

5660 AB=LEFTBÜNECY) Z-ZIHREHRIEHTBCRBECY) „ES TIFETRINGECL-LENGAR), 


5 
5 
5 
5 
5 
2 


5670 \ PRINTSSI2.A8; 
5520 PRINTSSOO,"EINGABE KÜRREKT ? CA/ND 


4 
- 


3520 IFEPEERÜLJSSEISJITHENNECYIFAFSPRINTSPOO, "=> BITTE WARTEN Nom 
“sHRETURNELSETFPEER(1433 EISEHTHENS 

SSOELSEIRPO 

SEOO TREE EEE NEE NEE 

3000 "BIRECTERY 

BOOT RER RN RE AREA RUE RAR ARE 

OO CE 


5020 CHD’DIR OTZPRINTSO,."TTEXED IT ------ DIRECTORY 
5022 PRINTSSF, een | ee 


5025 PRINTSTOS. “ BITTE HAEHLENE"TSPRINT” #2 = ZURUECK ZUH STERTME 

NUE* ee: 

EOIG PRINT" 2o= LOESCHEN VEN FILES"=PRINT” 3=.NRUCKERBUSGRBE 

GOTT S8=INKEYSEIFBE=""THENSOLT 

en PRINTSZSE," "en EPRINTSES "EZ, "REIFRBE 
HE THENSSOVOELSETFNFEFEFTNENSFOOELSELOOO 

BO20 BE=INKEYPEIFAR=""THENSOFOELSEGUTÜFODO 

EHOO CMD’DIR 9,P"F:LPRINTE:GUTOSOLT 

Ga00 ZNPUT"FILENSOHE"CKKE 

iO TEREL=S"O’TNENIOOO 

GSEO IFRKE="TEXREDIT/BAS"THENSEOLE 

SEO KILE KRFEGUTIEOOO 


7200 RSS 
FRE ELISTEN BEINEN TENTES 
FEZO RR RER NER RR 


en ASOsCLEEPRINT”TL IS TEN EINEN TEÄTENLENT:P 


en "EPRINTTBEGINN DEZ LIZSTENS: TASTE DAUECKEN” 
ERBE LE PEER(2IS SEI=OTHENT22Z 
FETS GELSE = 


7224 IF PEERCIFSSZISOTHENTZ2ZAI 

7225 IFPEEK(LIES2I=LTBENZOOO 

7230 FÜRY=ZTVIOLNEXT 

7290 IFLENCKECOIISGETHENPRINTAÄRCHDELSEPRINTÄBCHI: 

7250 IFÄXATBENXSXRLIGOTOTZRE 

7260 AS=INKEYEZPRINTSPRINT"TEXTENDE"SPRINT”HEITER = TASTE DRUECKE 
N” 

7270 FÜRX=ITOTOOENEXT 





GENIE DATA 43 
EEE EEE Een A BEER SIBTÄTA VG ER TEE LEE EI ge BEER ea SEE er NETTE EEE TEEN ET ETETERAT, 






FR7SOAR=INKEYE 
F2RO RB=SINKEYESIFRR=""THENTZSOELSEZOOO 


IDEE TOAEREAERA AREA RER RE AA AA EA AA RE AA A AA A AR AE RE ÄRA 
2000 "VEREINFBCHTE DRUCKERAUSGBBE 
BOOT RAZER ARENA RER RE AREA AREA RE A AL AU AL ARE AR 


EOIO CLESPRINTTRU NG AB E RUF DRUCK E RT:PRINT"----- 


Gas a a a se Ba ab de a FE ee seta er me IE RE TN 


mut den me hen mr Hm mt nme ren rm a mn mn RENTEN Tan ger nun A TE TR HET me er Te ha ame dur 












3020 INPUT"RANDABSTAND" RA 
2022 TERA>ZSTNENZOOO 


EO275 RA=ZRA/ZERB=RARN . 
2027 PRINTE PRINT"DEHTSCHER ZEICHENSATZ CUNLBUTE> VERWENDET KU GE 
BERND“ 

IE KPSPEERGLISEEIE LEKPSATHENAZE=" I"ELSEIFKPSGITHENAIES"N"ELSESO 


Inu 





ZO2S PRI NT Be 
2030 a a STELLEN” 
ZOES PRINT BER, 
2030 INPUT "HIENIELE "KOPTEN" EKP 
2045 TERA=OTNENLOOO HER 
2050 FÜRYSITDEKR 
BOSSE FORYYSZOTEA 
BO53 IFPEERCIHISOISITHENLPRINT: GUTOIOOO 

BOSS IFLENCHLÜYYPISGATNENAASO 
E05 IFLENCKSCYYIDSEOTHENNRCYYISLEF TEONBCYYI, FO) 


RSS 











BOB IFLEFTECHECYY? EIS ZEHAL 27 I>THENGOZURRISO:GOTORORS 
ZOBSEZ IFLEFTECRBÄYYD, 23=" 8" THENLPRINTCHRE(24): LPRINTSTRINGECRR/2," 
"ISZTFRLENCKRRCYYII- ENFZ ERS SSTHENPSSEMIDECHFCYYD,2,0- RA) SGMEUBERE 





GOEGUÜTGBOSSELSEPES SKRCHY)E GUSUBBZ0O: EHTOBOSS 
2EOSE TFLEFTECHBCYY) „ÜISCHRECZSSITHENARSRIGHTECKEOYY) „LENERBEOW DI 
>S GUSUBESOO: E0TN2065. BERGES, 

2084 LPRINTEHRECISISLPRINTSTRINGEERA, MYEEPESKECYYIEGUSUREZOO 
2065 NEXTYY 
BOE®@ LPRINT 
2OTO PRINTSEIJO, "HEITERE. 
2ORO AR=INHKEYLRTTFARSZFFTH 
ZO90 NEXTY : 
2002 IFLENCXBCOPDSFOTHENN 
2095 PRINTSFSE,"MEITERE 
22100 A®=INKEYE: IFAR=UNTHN 
3105 GÜTDIOOO ER 
2250 LPRINT: FORZ=1T0503QUT2 55, ZEOUT255,0:GUT255, 2:0UTZ55,1:NEXT 
22160 PRINTBFEZ, "mm a Blau danken ach area ken ine dere en nn Hy 
2170 PRINTSEZSZ "DRUCKER AUE BERTTANFANG STELLEN 
2I2O PRINTSE: “TASTE "DRUEOKBEN?; 


\ 















STE DRUECKEN” 





Danslodun " 
STE DAULCKEN” 
0120 



























REREREERBERSITANEUSGRNDEERDESSHDSRIEBRZÄRIESRERN 





2290 PRINTSPEO, "aaa mean men nenn nn "; 
. SBI9D DE=INKEYESTFARSURTHENELDG | 
\ PRINTSTEE," "; 
PRINTSASD,” ”, 

PRINTSZOS," el Mr 
PRINTEIGO,” a B Ei I Wi 
20 Bean ee es 
2300 JERZESUNTTHENLPRINTPS5 ERETURNELSEFORN "ZTOLENCPEIEMESMIDECRE, 


A,825 

3370 IFASCCMEISSITHENNES CHR&CIT FVELSEIFASCCMEISOLTHENNE= CHRECITE) 
ELSETFASCCHEISSIITHENMESCHAECIEOJELSEIFABCCNMENSIZITHENMESCHRECESLD | 
ELSEIFBSCCHEISZZITHENMESCHRECITFSJELZEIFASCCHEISINSTHENMESCHRECIEIZ 
IELSETEAZCCHEI=LZETBENMESCHRECIT EL) 

2I2O LPRINTMESSNEXTAZRETURN 

MIO TR ARERACARERAAE AAAEARAEHEÄ ACRE AL AL RR DE RACE AREA ARE ARE 


Sn 
z 
3 





44 GENIE DATA 





8520 "UMNHANDLUNG IN PROPORTIONALSCHRIFT 
BILL RAR AARAU AT NEAR AR AA REAL AA AREA AA RAU 
8920 LPRINTCHRECE) 
2925 IFRRNOTHENLPRINTCHRECSISCHRECZEISCHRECRBREISCHRECZLE) 
2526 FORÄ=LENCHEITODISTER- 2: IFMIDECHE.N,22=" ”TNENNEAT 
ESET RABSLEFTECHE,A) 
2530 FÜRT=ITDLENCAE) 
2ZSJ0O ANE=NIDECAE,T, ZI: EDSUBZE2O 
2545 LPRINTCHRSKEIZCHRIC IN DE 
2350 NEXTT 
2920 IFRSCCRPIKTETHENGOSURPOOOERETURN 
BIEO TEASCCHEIZSTSANDASECOHSAN ZIFTMENGDEURTOZOLMETURN 
29JO GÜSUBTOZOSRETURN 
000 ONASTCCHEI-IJZGHSUBVS00,2510,9520,9530,9590,9550,95950,9570,9582 
0,95390,95395,9599,9500, 95/0, 9E20,9530, 2540, 9580, 2ERO,EO, an 
0,2700,#8710,9720,9730,29740,2750,4500,9759,2500,09760,9753,9770, 
3 PFRO,PFES, BFOO,DTOZ, OROO, 9205 ‚PEIO, 9215, 9220 
5005 RETURN 
020 BNBSCCKE)I-7TSGOSUBPE22S,9330,9335,9840,98945, 9250, 9260,9265,987 
0,292375,9RR0, 9285 ,9E90, 295, 9900, MOL ,PPOL,F9OF, 2500. POS, 9500, ZOO 
10,10020, 20030, 20090, 10050, 10060, 20070, 10080, 20020, 20200.10210,10 
T20,41021350,20435,20440,202350,20160,10270,70182 „2o2203:: 
0/5 RETURN 
BORQ UNAS Se 10220,20220,210230, 20270, 20250,2/0250, 
LO2FO, 202 ‚LO220 
2025 N 
VITO TREETEREENEEERERE EEE EEEREETE RA E EEE E RE ER A 
490 "Druckerausgake Proportionalschrift 
VIE FREIEN EINE ANNE NE NEE \ 
"500 LPRINTCHAPÜIZEI:CHRECLAEIS:CHRECLZR I GE RETURN: 5 
9520 LPRINT CHRECZZZIESRETURN En 
520 LPRINT CHRECISSIEOHRECIZEI SCHRECIE SD SE RETURN: 
. LPRINTCHRSKCIEFI:CHREKZSSIS:CHRBELZ GN): CHRECIESI Er: RETURN 
MGHO LAMRINT CHRRCIEEIECHRELITFRD: CHRECZSK: BERN LRREETEINE 
TURN 
2550 LPRINTCHRECIEFPI:CHRECI IF): CHRECZOODLZRETURN. 
2550 LPRINTCHRS (282) LOHRE (ROR) -CHRECBIR> TCRRR (LGOFÜNRECKOBI:TRET 
URN BEER! 
PS7O LPRINTCHREKISSI«CHRECZTIJ IE SRETURN 
25FO LPRINTEHRECLERSSCHRECLOIFJES RETURN 
2520 LPRINTCHRBECZEFI:CHREKZESISSRETURN 
5395 LPRINTCHRECHIEP CHA LEN SCHRIECH LEI SS RETURN 
e: 3SDE LPRINTCHRECHTTISCHRECZ ES ISCHRECL FF) SSRETURN 
i 2500 LRRINTENHALCTTZI:CHARLCIGEOTERETURN 
: 2520 LPRINTCHRECEIITISCHRECZ FI ISCHRECI IS) SZ RETURN 
MERO LERINTCHRECITORN:: RETURN 
2530 LPRINTCHREKZZIISCHREKZSZISCHRECZZS FI: SRETURN 
P5H0O LPRINTCHRECLZEISCHRECL PAS ZÜHREKL ZB): RETURN 
2550 LPRINTCHRECISZISCHRECZSFPISSRETURN 
Pa5O LRRINTEHRESZZZEIECHRECE LO :ÜHRELZOR I SCHRECIPE) s: METÜRN 
2ETO LPRINTCHRECISZISCHRECZOZISCHREKCZI SP): CHREKIZSEI GE SRETURN 
7580 LPRINTCHRECZSR IL CHRECIEUSCHRECHSPIZCHRECIKU) LRETURN 
PE2QO LPRINTCHRECZOGISCHRECZOZILCHRECZOTISCHRBCI TEIL ERETURN 
PFOO LPERINTCEHRELCLEEI ECHRECZOLISCHALKZOLISCHRELATAI SS RETURN 
2710 LPRINTCHREÜZZEITCHRECIIEI: EHRE(ISEI: CHRECZSF)SSRETURN 
W720 LPRINTCHRECIE YO) ECHRECROR)CHRE(2O2: :ENHRELIEO) GSPRETURN 
IFIO LPRINTCHREÜZOBISCHRECZIONLCHRECZIO) :CHREÜIEEIESRETURN 
M7AD LPRINTEHRECIGERDSERETURN 
2750 LPRINTCHRECZPEISCHREKZEEDESRETURN 
"735 LERINTCHRE(LERIECHRRC LEE DeCMARCIGAIG:NETURN 


- 
Bi 





Cr 


3 


DEN EEE EEIEEEESSRLSEENIERNENPSBECCHEETEEGERDEEILOIEPIENWEOTEER IE EREEEMEETETER EIER EEE RETTET a REED NEED TE NE Beh mn mn nt hm anne nen ann 
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COLOUR -GENIE SOFTWARE 


SCHMIDTKE 


electronic 
Büro- und Personalcomputer 


Sandkaulstraße 84 - Telefon: 0241-232 17 
5100 AACHEN 


PREISWERT 


Wir senden Ihnen gerne unseren Softwarekatalog mit über 100 Programmen! {Natürlich kostenlos) 


GEMINI 10X - so gut haben Ste 


für so wenig Geld noch nis gedruckt ! 

der GEMINI 18X ist ein Normalpapier - Matrixdrucker von Star, 
mit einer Geschwindigkeit von 128 Zeichen/sec., ein 9-Nadel 
Druckkopf sorgt für beste Schriftqualität, der Druck wird 
natürlich bidirektional und druckwegoptimiert ausgeführt. 
Hochaufläösende Grafik Ist durch Einzelnadelansteuerung möglich; 
die Auflösung ist von 488 bis 1928 Punkte pro Zeile wählbar! 
ASCHI-Standard-Zeichensatz, 88 Internationale Sonderzeichen, 
Kursiv-Schrift, Blackgrafik, Grafiksonderzeichen, unzählige 
Schriftbreiten, fett-, breit-, elite - Druck, etc, sind genauso 
selbstverständlich wie ein ladbarer Zeichensatz und MACRO- 
Instructions. Der. Traktor für Endlospapier läßt sich von 7,5 cm 
bis 25,4 cm verstellen. Einzelblätter können eingespannt werden 
(Gummiwalze)j; sogar: eine Halterung für Rollenpapier ist im 
Preis enthalten. Austieferung mit Centronies.- Parallel - 
Schnittstelle. RS-232C als Zubehör: Jieferbar. 

Art. 368 1195... DM 


nr Auszug ans unserem Litlsrprug ia 


Drucker-Zubehör 


Endiospapıer mıt pertoriıertem Lochrand (Lochrand abreißbar) 
Qualität HF 88; 246mm und 258mm - Papier ergibt ohne Lochrand 
DIN Ad - Größe, Bei Durchschlägen (2fach u. Ifach) handelt es 
sich um selbstdurchschreibendes Papier. 

Bei den Art. Nrn. 378 -.379.müssen auch bei Vorkasse je Karton 
5.- DM Porto mitgetragen werden (ansonsten Versand unfrei.) 
Bei NN erhöht sich das Porto auf 18.- DM pro Karton. 


Format: grüne Lese- Karton Art. Preis pro 
Breite x Länge streiten inhalt Nr. Karton 
248 mm x 12” Ifach nein 2888 Bit, 378 48.7 DM 
248 mm x 12” lfach Ja 2808 Bit. 371 49.- DM 
248 mm x 12" 2fach nein 1888 Bit. 372 65.- DM 
248 mm x 12* 2fach Ja 1888 Bit. 374 65.7 DM 
248 mn x 12” 3fach nein 58 Bit. 375 79,- DM 
250 mm x 12“ fach nein 2888 Bit. 375 se.- DM 
338 mm x 8* ifach ja 2888 Bit. 377 52.- DM 
375 mm x 12" it fach Ja 2688 Bit. 378 39.85 04 


Endlosetiketten, Addressaufkleber: Größe 88.9 x 35.7 mm 


Trägerbandbreite 115 mm, Kartoninhalt 4888 St.;z i1-bahnig 
39.98 DM 


Art. 383 


EG 2888 Colour Genie m 16 hen und neuen ROM’s 53.- Mm 
EG 2811 ISK-RAH Steckmodul, erweitert ihre Color - ri 
Art.384 Genie auf 32 K RAM. 120,. 4 
EG 2812 Druckeranschlußkabel mit Stecker und 
Art.385 Paralleiport - Konverter ([Lentronics) 98,- DM 
Art.468 Kabel wie Art.385 jed. mit Treiberbaustein 199.- DH 
EG 2813 Joystick-Set (2 Proportional-Joysticks 
Art.3B65 mit Analog-Digitalwandler sowie Tastatur) 295,- DM 
EG 2818 passender Kassettenrecorder mit Band - 
Art,387? zählwerk, 125,- DM 
EG 2817 hervoragend geeigneter Kasssettenrecorder 
Art.388 jedoch ohne Bandzählwerk 897.- 0oM 
Neue ROM’s : neue Roms für das Colour - Genie 

Infos und Preise gesondert anfragen ! 
Sony CHF &8 Programm - Kassetten bester Qualität 
Art, 31 langjährig bei uns'erpröbt.. I8er-Pack 28,- 0M 
Schaltpläne Sammtung der Bestückungs- und:Schalt- 
Art. 313 Pläne für das Colour Genie und: Zubehör 15.- M 
Technisches enthält obige Schaltplansammlung; sowie 
Handbuch Biockdiagramme, Beschreibungen’ und Hinweise 
Art. 314 zum Netzteil, CRTC-Chip, PSG-Chip, CPU, etc. 


CPU-Befehlssatz, Anschlußbelegung, Hinweise 
zum Paratlelport und serielter Schnittstelte, 
Kassetteninterface u.v.a.m, Art. 314 949.,- DM 


ROM - Listing vollständig Kommentiert, mit Kommentierten RAM 
von Adressen, 1/0 Adressen, Unterprogrammlisting, 
L. Röckrath viele Tabellen u.a, Art. 458 59.- DM 


ROM - Listing wie oben, jedoch mit einer guten Einfijhrung und 
von Begleittexten zum Listing; insbesondere für den 
Klaus Kämpf Anfänger geeignet, Art. dsl 69.- 19 


NEU 


Colour - Genie Bücher: 

mit vielen Tips und Tricks zum Colour Genie, 
Interessanten Programmen und Programmierhilfen! 
Band I > Art, 482 / Band II = Art. 483 


Preis pro Band : 39,- DH 






POWER 
Joystick 


Super Joystick für das Colour Genie ! 

Aus eigener Entwicklung. Läuft mit fast allen 
Spielprogrammen (Matten, Wurm, Hektik, Andromeda, 
Eis, Invasion, etc. .„..) Der große Griff mit Feu- 
erKnopf liegt gut in der Hand, ein weiterer Be- 
dienknopf (RETURN) auf dem Gehäuse. 





Art. 315 Typ Power Joy At (zum Eintöten) 75,- DM 
Art. 318 Typ Power Joy Br wird einfach eingesteckt 78.- DM 
Stecker 28pol. Steckerleiste mit Kontakten * 
passend zum Parallel-Port Art. 317 24.58 DM 
SApol. vergoldete Steckerleiste 
passend zum Systembus Art. 318 27.88 om* 


EPROM - Einschubı Plastikbox, passgenau auf den S8pol. Bus des 
Colour-Genie. Mit 58pol vergoldeter Steckerleiste 
und Eprom-Dekodierung. 3 Leerfassungen für Eproms 
Typ 2532. Endlich haben Sie Ihre Programme direkt 
beim Einschalten des Gerätes zur Ver fugung. 

Art. 459 39,- nn 
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BTEQO LPRINTCHRECISEISCHRECHIONSCHRECHTE IE CHRECHSZ DES RETURN 
765 KPRINTEHRÄRCLEEDSCHRECH LES GCHREKE LES GCHRECIFZ 2: RETURN 
2FTO LPRINTCHRECZEWILCHRECZZEISCHRE CHE): RETURN 
775 LPRINTEHRECHSAIGÖNHMECHON, > EHRE 1EOdz: RETURN 
BFEO LPRINTCHRECHEEISCHRECHP II LCHRECHETP Dr RETURN 
TE KPRINTCHRECHSINGZCHMECLP SI LOMPECDEED  S RETURN 
2780 LPRINTCHERCZSI >: :CHRECHODECHRECHOZ IE RETURN 
PF95 LPRINTOEHRECHSSD vc HRECLEEDGOHRECTZE ES SE RETURN 






De 





2200 LPRINTCEHRECITENDSCHRECHTEN z -CHRSCHIO) sCHREKZIZ DE ERETUNEN 
EOS LPRINTEHREIESANGCHREC LESE SCNMECHSAT, ERETEIRN 


2EIO LPRINTCHRECHSFPISCHRECZESISCHRECFEN IS SRETURN 
EIS LPRINTECHRECLSOSGSCHRECLTIDGCHRECZPOI RETURN 
0520 LPRINTCHRECZEF): CHRECIES)CHRECHAEILCHRBCHFON: TRETURN 
ME2S LORINTCHRRCHSU2CHRECIDRIECHRECHUL N: RETURN 
2EIO LPRINTEHRSKZSISIECHRSCHSZISCHREKIT SEI ECHRECH SED GCHRECEZESIESRETF 
URN 
9235 LPRINTCHRECHSIIGLEHRECTJOIECHRECITEISCHRECZEIISSRETFURN 
BEHO LPRINTCHRECZEEBGCHRECL ON SCHRECTAEI SZ SRETÜRN 
EJS LPRINTCHRECZSPISCHREKZISSISCHRECI IZIESRETURN 
9250 LPRINTECHASCHZEIGCHATSKC LEI ECHRECHSIISCHRECTZONgG RETURN 
2350 LPRINTCHRKZSSPIECHRECISZISCHRECI SEI LCHRECZSEISSRETURN 
9255 LPERINTCHRECTPSISCHRECHOMISCHRLCRORSSCHRECITEI ST RETURN 
PETO LPRINTCHRECZSOIZCHRECHEIISCHRECITOI: RETURN 

’7 LRRINTCHRBCISONZCHRECZUR): ECHRECIPMOSSERETURN 











DE LPRINTCHRECZSE): CHREEZZIITCHREE 258): RETURN 

ERS LERINTCHRECHS: #3; CHRECLISOP:UNAECTZZIGCHRECESOS:ZCHRBCH SA LA BET 
URN 

BE3Q LPRINTCEHREKZIONZSCHRECHSZI-CHRECZTO):SRETFURN 

PREIS LPRINT CARE 238} :EHRECHPEIGCHRECLES I RETURN 

7200 LPRINTCHRBSCZZEISCHRECZIONLCHRECZOZILCHREKZPEDI ET RETURN 
FPOZ LPERINTEHRPCRSOSSCHRECHKEISOHRLCRSON, RETURN 

BPOZ LPRINTCHRECZSOISCHREÜZOOSCHRECZSOLFRETURN 

PROF LPRINTEHRPCRSOSCHRELLDTZISCHREIZTSONSS RETURN 

2205 LPRINTCHRECIFIFI .£ CHRECEFSIECHRECLI FILE RETURN 

LROLD LPRINTENRECTF SP SCHRECZOO %: CHRECE 242) :EHRBCLFZPSERET URN 
ZOQZO LPRINTCHRECZESIPISCHRECHOOI:CHRECITEI 22 RETURN 

ZOOFO LPRINTCHBECITEISCHRECZOON:ÜNRELZOOSSERETURN 

20040 LPRINTCHRECITEILCHRECZOO) SCHRECZSL)I EERETURN 

20059 LPRINTEHRECZIEISÜHREKCZLEFSCHRE 2LBSSERETURN 

20960 LPRINT CHREKISSISCHRECZEF NE CHREC 238 3 FRE FURN 

LO97O LPRINTENREIZIGDSCHRECT ED: !EHREE Az RETURN 

ZROEO LPRINTEHREU 254); CHREC 136): zEHRECE 40) yE RETURN 

KODPO LPRINTEHRECHZOJSTRETURN 1 a 

20200 EPRINTCHRECHSOIZCHRECISZISCHRECZSOI EZ RETURN 

FOLIO LRRINT CHRECHSE >»: EHRECIFEPSCHAECHOOPZERETURN 

ZOZZO LFRINTCHRECZZF) :E HRECZEND: ERETURN 

ZO2350 ERRINTCHRECHSEIGLÜHRSCLSESSCHARECHSED SCHE ISIS CHAT CZHÖONG ERE 
TURN 

20235 LPRINTCHRBECHFEIGCHREKCIZEIGÜHRECZJO) SE RETURN 

LOLEO LPRINTCHRSCITEPZÜNRECHOÖS SOHRECIF SS HH RETURN 

ZOZSO LPRINTCHRECHTED SCHRECISZIGÜCHRECISZILZRETURN 

ZOLIGO LPRINTCHRECLSRD EHRE KLSPIGCHRRE 22) RETURN 

ZOIFO LPRINTCHRECZFZILCHRECIISEIZERETURN 

ZOLEO LPRINTCHAFE: 2OR); EARSKHIEDEOHRECLEEI GE RETURN 

ZOZPO LPRINTCHRECZSEISCHRECZSIPISCHRECZOO)GSRETURN 

ZO200 LPRINTEHRECHEEDGCHRELIPPSSCHRRCE AED 3 RETURN 

ZOZIQ0 LPRINTCHRECITEH) +C HRECITE) SCHREC ZEJI SE RETURN 

ZOZZO LPRINTCHRECHESI:CHRTCHIZIGOBRFCLFE > :EHRBCZPZISCHATC DES DZ ERE 
FURN 

20230 LPRINTCHREIZERISCHRECIEOISCHRECZZEITSRETURN 
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LRRINTEHRELZOOFSECHRECIT "E2SCHRECITEN s: RETURN 
LPRINTCHRECEOOIZCHRECZEZIFCHRECLIEIZEHRECZOOIESRETURN 
LRRINTOCHRECIHFEIZCHRECHOONGLCHREK SO SCH RRLCEPEE SG :RETURN 
? LPRINTCHRRCZSO)LCHRECLPZILCHRECHSO),ERETURN 
10220 ERRINTCHREKITEISCHAECHOOSSCHRECHEFED GE RETURN 
ZO290 LPERINTCHREKZSIISCHRECITOIGCHRECIEN) ; RETURN 





E Ö ZOO 9 EEE nl edge dt ic ed Ar, ER aeac auge tdedeataedtleleate 
20810 " FTextformatierung 54/50 
VOGZO 7 erde AA AREA AEAE RAT ITRR AR - 


10525 CLS 
10530 PRNTTERTFUORNATIER UN BYSPRINTISS-in nennen 


ä wur 
Inn nan nm ann mn non nn ann nn nn an nn mn am me mn ran au ner vun nn ame mn ver dee 


IDESE EFLENCKSCO) D=ZOTHENPRINT"TERT FEST BEREITS FORMATIERT"EEHTOY 
2 £ OÖ 

20535 N2=0:2N2=0 

ZOO ERNIn 0: "BLFE GG 
et RINTEZZ 0, "NEUE 
205650 FORNLZOTER 

LOSFO PRINTSEFI,NEFz 
20972 ZFLEFTECKRBCNZEI „ EDSCHRECIZTITHENGOTMIOZOO 


= 


EILENNUHHER’ EMI 
ZEILENNUMMER” ENZ 


in! 


ZOSFS IFLEFTECHEENED, DPHCHNECISSPÜORLEFTECHECNID, »737 THENGESLBZE 
200 


JOS20 FORT=1TOEJ 
LOSPO TESMIDRCHTCNID,T ED 

20800 IFIt=" "TWENGOSUBZI000:60TU10850 

10520 TEISS"STÜRTESOCHREUISEITNEN LOG 50 

[OB2O TEI BEN" THENZOSSO 

LOBEO TEASCCILISOHTHENGOTEIOSOO 

20540 ZIR=IIS#IR 

10550 NEATT 

20554 I8=" "3G0SUR2L1000 

IO8E52 NENTNE we, 

10554 m Be 

10560 Q=NZEIFLENCRRCOIISBOTHENKECOI=ÄSCOI #STRINGECEO-LENCKE(O))," 


I0GES PRINTSSEZ,"” 

DEE N 

ZOGEE PRINTSSST,NZ 

FOE70 PRENTEPRINT TEXTFORNATIERUNG BEENDET" 

Zöszö PRINT:PRINTTHEITER TASTEIRAURSREN! 

IOR2O DFFEEKRCIFSPEISOTHENIOSLOELZELENIZODOO 

LOROO TIFITIEEPYFTGENZURZLOOO 

ZOEIO RPCNZISRFENZENZHICKBSNUERSCNHZIE =CHREK LET # NZ=NZ# 22 GE TOIOGSZ 
ZOPOD TELTIPXS”FTHENGOSLURZIOOO:EL HP 

208220 IFRISSUFTHENNPCNEDERBENZENZAHIGK ESF 

LORPEO TFTZITHENABCNZDeT ENDEN 

20925 PRINTSS3T,NZz 

FZOPEO GOTULOHSO 

22000 ZFTIN=""THENRETFURN 

LIOEO ZEHLENCHFITLENCTTED 

221020 ZIFZ EEE "lies" "2RETURN 

AEOZO TEESSBÖOTNENKECNZISRFERLBAT TIER” YENZENDELEI IB" PRINTSSSY NE 
:: RETURN 

21200 IFLEFTECKE 2D="B'ÜORLEFTECKE, ZD=CHRECISSI THENRETURN 

LI2IO KRSLEFTECHLUNZD ÄrtRE : RETURN 

22000 TREE EN EEE REN 

42020 "BERTENUNGSFERLER 

LEO20 TRERRRÄRTRAÄNER AN AR RAR 

Z2030 IFERL=SOZZTHENPRINTSESG, "FILE NICHT IM DIRECFORY"zZ=FÜORY/=ITO 
POO:NEATIPRINTAZPE,” Y"aGlTnadze 
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mare TEE AT TC: BET BEER NGRBEUNSEERREFCTESTLSCHPENE NORTON WCAG. mare EEE TEEEBEBBEER EEE aRsEaP PERRAPORFELTEEREELFEFETFETRTEETEETEEETTEE- ers amreeiENTTAEEE: 





IEDSE EFERL=-ZITOTHENREEUMNEZOOO 

YEOSS TFERLEAFSETHENRESUME SLZRO 

12038 IFERL=ESSOTHENPRINTSEPS "FILE NICHT IM DIREETORYTLEFORYSETE 
SOOENEATSREZUMERSOLE 

Z20J0 IFERL=JSJFOTHENPRINTEJUZ. "FILE NICHT IM DIRECTORY" FORY=ZETO 
MOO2NEATZ:PAINTAZEN,” Y"EPRINTAUPL," "GOTT 
2330 

22050 IFERL=SJSEOHRJSESTHENGCLÜUSELFRINTEPRINTFSPEICHER VOLLYEZGOTOFE 
LO 

12080 IFERL=SZSESOTHENPRINT” & Rx SPEICHER VOLL RR a": G0 704520 
ZEOFO TEERL=EIOFOTNHENPRINT” x ma MPEICHER YÜLL NOCH ZEILE Kells" 
ur MUEHOTISELFO 

ZEZEOEQO IFERL=I0OGOO THENPRINTSFHE "KEIN TEXT IM SPEICHER" :GOTEIELIO 
Z2ORS TEERLIOEOO:EENTULOSSO 

22020 PRINTERL 

LEORO RR ER ER EEE ER EEE EA ER RE REN 

43020 "WEITERSOHRETREN VON TERTEN 

ZFOZO FREUE EIER EEE EEE 

EOZE CL PRINTTE RM EI TERN EINEN TEA TRATE 
NN 
ee ne 7 PRINT=ERINTFFILENAME U 27: AR: PRINTEPRINT”SBSEGSINN DEM EIHER 
BE TBSTE DRUECKEN” Ka, 

JEORZEODE=INKEYLS TENBS"THENASONFZ 

ZS0r5 CLE u, 

13030 IFOWISTHENFORKRSÖOTERE PRINTASCKRI LERBCH IE" ENEXNTEXFISTEOFRREHFE 
PREEA, LELINFOSGOTAZZOSO 

230J0 FORZ=U- ISTÜIG:E PRINTNECEISERPÜEI ST HEINERFTSG=U- 2IS POKEISETSS,23L 
a 

25050 PRINTSEGO, 

"SETEETSETSET--> SCHREIENMODUS S--SETSETSETSETSETSETSETSETSETSETSE 
TEETSETSETSETZETSETSETSETSETSET L = OO SETZETSETZETSETSETSETSETSE 
TSET”z 

23055 DI=SHEPRINTSZIOOP  UIlr25:" ": 

FEORO GEITEZ2EDE , 

ZEIO0O RER ENTER ! \ 

ISOIO "EDITOR 

IJOZO RER RER 

IO2S Zell 

234030 CLS=:PRINTTED I TG R"=PRINTESTRINGECEF,"-"IEPRINTUYSTBERT * FF 
RETE BRDIECHEN” 

ZIOID BEZINKEYVEEIFRE=S""THENTFOFOELSEULE 

IHORO FÜRNSOTDLESETFLENUNECHIDKSSATNENPRINTASCHPELEERRINTAREC AT g 
24068 NENTA 

LROGE PRINTIECHD: 

240OFO PRINTSSEGSO, 

"SETSETSETSET--M> EDITOR S=-SETSETSETSETSETSETSETSETSETSETSETSETSE 
TEETSETZETZSETSETSETSETSETBETSETZETSETSETSETBETSETSETSETSETSETSETS 
ETSETSETSETSETSETSETEETSETSETSET”: 

48075 PRINTALOIO,” L = 15 7”: 

IJOEO I=-Q0:U21=25 

#100 Ze23350 : 

A420 ZISPEERCZIEZENSZEIPOBEZ, 279 

IHLES TEREERCLISHOONFERANDERZASSOTNENZed- 4 

FILE IFPEERCSJÖOOISEHANDLSESSZOTHENZSZEHZ 

ZIELE TEREERKLEAIDO FE LSANDENRPSSTMEN ZZ AS 

Z3E2E ITFPEERCEPIOOI=SANDZSISIZSTHENZEZ- 4 

LALZEO TFEPEERCIFESEISHTHENPAREZE EI SGOTOIREDO 

ZIL2S IFPEERCZASFEISZTHENPOKEZE  Z2EGSOTÜOZLITOO 

IHEEO TFPEERCZSSOOISZTHENPORELZE „2.2: GN TÜIERZOO 

ZIEH TFPEERCIFIIIISITHENPÜUKEEN ZI: GO FÜU24230 
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ZEETO TEPEERKISMSSTFIEITMENPONEZE EEG ERSC 
ZIISO IFPEERCZJSSTIHSEZTHENPÜKEZE Z2I:GUTÜOZFOOO 
LLPO PUKEEZ RISGÜTLDZISCLIO 
II TDE FF RRRRERRIAT ARE EEE 
LI200 "RILBESCHTAN SCRÜLL 
LIEDER RER EEE 
EAN LO NET I=NN 
4220 TEVARPTRCURDEPOKET GIF: POKRETF+L,O:PÜRET#+Z,SHSCERPCIISUR 
LSIEO Taf#gfeIEI=ATIENGEOSURSLESE On 
23239 GUSUBZEIO 
220 PRINTSEPIG,KECHI I: SQ L- de 
142535 PRINTSIOV4,I#215z 
ZAIEO GITILESE .O 
ZIZED TERN RC RE EA EEE EN REHEE 
a "string verschieben 
ISO TREE 
188 LO TFESSILETNENRETURN . 
2ISEO FORX=SZITEWISTER- JERECKTHIOJSKECHISNERTI Z Ja ZJ4RIOSULSULFIOERET 
HRN 
ZIETD FT RRERINTERNEN TE RER ER RE RE 
LESOO "HILL LINE 
IIEOF een nn u 


AED NIELS DFINTCCH- [3ER0 2 rl} 

24520 G0S ne aA2023=08 PRINTSZUS, APKCHI Ds eMI=N #2: GOTOZFLZO 
PA DT TARA ARE RE AR ER RAR EA AE 

24700 "insert line 

f Au OÖ FE Pre Qindb te EC Allee nd deine gelbe Ne lege gi nat 


IF IO RECHI=NPSFORK=ISIEOFTOISFZIEÄTCHISÄFCTIACHRECPEERCKHYIDENERXT 

ZSHF20 T=T#r 2: PRINT3LTOZS, Ir 25:2 TE THWITNENGDEURLSEDO 

IHTSO ERRCHISINTCCR- ZSIE0O I / ES I SGUSURZP2OSRAKCHI = ZI: GATÜULFELQO 

AFFE RER RERE ARE ARE RE ÄRA RER RAU Ä AH AHRE 

23209 "editor 

23207 Dee RER 

8205 MESTNKEYE 

Z4EEIQ POKREIZ,ZI 

LEEZO ZIHPERMCHSEPOMEZ, 1917 

IHE3O RE=FSINKEYSSIFARFUNTHENZIESO 

HESS O TENFEGIRTCHITIENTER aan 

ZIE30 ZERSSCHRECHITNENPOKEZ  „Z22G0 TOP HF LFO 

AHESO TERFFCHRLCHSITIENKS "2 OOSURESOOELENTENTNLETO 

ZIESO IFBE=SCHRECESDITHENASZEGUSURSGEOOE ZEAF GR TFOLFESO 

LAEFO TENPFCHRTCTIPTNENAF=CHRFCLES? 

24320 IFREFCHRECHSEITHENGR= an 

EEE TENSCCAPITSZTNBENGOELBZESOO y 

ZHEEO TENSZGSZSTWENPOKEZ BSCCAPITZEZRIEL GOTOEAZZOELSEFORELSIZP,ZEL 

GTOFSEEZO 

LIESDT RRERERRIE EEE NE RER 

LIDO “abspelcherung 

2ISOE RER ER A 

IERZO TERIZESTNENFDRASZITONZDETER- 2]: RB CHRIS- (de TIP IEARCHIENERTA 

249220 FEORX=ITOTFISEREER) =" 

an TEVRRPTROVEDSPORKET , 543 TH= 21536 OMCK 
-TTRDSEIPOKETFL,TYEROKETR? 2. 

a NENTA er 

234950 IFIFZJSEITHENG=SIHIJELSERNSEIFÜLS-CHI-E)) 

LIPEO GÜTLZODO 

2E000 FORN=SZFTIZSTOZTZIFEZEREANDYSPÜOKEXR,Y=NEXTA 

25070 RETURN 

2158200 DATAS3,236,127,39,122,68,199,209,6,205,23,32,213,205,27,33, 

209,213,12,209,2,93 2268,35, LIS, 35,114,225,201,0 


* 





Ürwası TTSINTCTN/256)ETY=T 
































ERREGER: 
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Sascha Grebs 






Hier haben Sie ein Vokabel-Lern- 
programm für Ihr Colour Genie. 
Um es zu benutzen, müssen Sie 
folgendes tun: 

Tippen Sie das Programm wie 
abgedruckt ein. Speichern Sie es 


FO EHENTSRSESEREHEHDEDOSERTSBHISERSBSRSRIROESROESESETRHEESETEENEISROHSEN dann ab und starten Sie es mit 
ee Pooyplarr RUN. Alles weitere wird Ihnen 
ac: Es jetzt von Ihrem Colour Genie er- 
ware ee A Se te klärt. Falls das Programm nicht 
Be si einwandfrei läuft, besorgen Sie 
nl NE ER mit sich einen Partner und untersu- 
BUT oangresgigseiggingigiseipisitstiit chen es nochmal auf Tippfehler. 
SE am Stein Fu R Das Programm hat eine Error-Ab- 
100: 5449 Raubach u frage, deshalb werden nicht Pro- 
ie Fiss Bermany iu grammfehler, sondern nur Einga- 
120 " Tel. DOTAB4/I584 > befehler angezeigt. Viel Spaß! 

i Au PH EEE SEIEN Hp . 

i40 "Dieses Frosramm jaeurt aur lISyEE H Es laeurt ausserdem auf 5 
en "aiten’ Ung neuen Colour Genies. 

150 "Es bennetist keine Joysticks und auch keinen Drucker. 


1580 LLEARO 

17G6 ON ERROR GUTOD Fodu 
190 CLS 

19CG RANDOM 

Zu CLEAR GMEM- (MEM-50) 


216 DATAIl>1 50 DATAF=I 716 DATAS:S 
220 DATAS:S 470 DATAT=F 7zU DATAI»S 
230 DATA&:& 450 DATA&> 6 730 DATAS»7 
240 DATAS:»S 490 DATAS:5 740 DATA7>7 
250 DATAZ:Z =00 DATA4:4 750 DATAT:? 
Z&0u DATA7»6 S10 DATAZSS 760 DATA7:7 
270 DATAS-4 520 DATA2>2 770 DATAL-A 
z80 DATAFSE S5=0 DATAIL.I TERO DATAH>& 
290 T1Ai:.5 540 DATA2:2 790 DATAL:»A 
Aoon DATAO».S SE0 DATA: 300 DATAS:S 
Z10 DATAZ.7 S&0 DATRA4>4 ; 816 DATAZ.Z 
E20 DATA7:6 570 DATAS>S 820 DATA4:4 
EEO DATABS.S =B80 DATA: & i B20 DATAZ:»SE 
240 DATAS»4 590 DATAF=7 840 DATAS>E 
350 DATA4.S Sum DATAS:S 850 DATA4.4 
360 DATAZ»EZ 610 DATAI.F S60 DATAZ>E 
370 DATAZ>»Ä 820 DATALC: 1O 870 DATAS.S 
280 DATAL»I 620 DATAIL:- 11 850 DATAI>A 
390 DATA1:7 640 DATAL»1 270 DATAO:6 
300 DATAL>6& 650 DATAI:-1 Foo DATAIL>1 
410 DATA2:S5 s60 DATAZ:Z 710 DATA7=7 

=0 DATAZ:4 870 DATRBE»: zZO DATAI»I 
430 DATA4:4 530 DATAF-Z 920 DATAL.I 
340 DATAS>S 670 DATA4:.4 740 DATAL»A 


450 DATA&»3 700 DATAS>»S 950 DATAO.G 
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960 RESTORE 

770 COLOUR RND (16; 

950 FRINTEJO,.'BE © a m EEE | BEEEENE IE" 
770 COLDUR RND (16) 


1000 FRINTEEO.'TB BU UBER m usa wm a" 

1010 COLOUR RNDi16) 

1020 FRINTEIZO:"E mE Ta mE INEEEEm Hua HMMM Em BRmBmBeE 
1030 CDLOUR RND (16) 

1040 FRINTEIYO." A EB Ham m mm um m" 


1050 COLOUR RND (15) 

10580 FRINTEZOO," EEE ME mE Zu I Ga Ha HEMEEEEM Banana" 
1070 COLOUR RND (16) 

1080 FRINTE@ETZO, "BEGRER EEE HERMES 
1090 COLOUR RND (16) 

1100 PRINT." m m mm m 
1110 COLOUR RND (16) 


BE 35m 3 U MEERE EaaE'' 

zus 
1120 FRINTZE4ON," MU EEE ME Mi EEE IEHREMEEE BEER" 

EB 


1130 COLOUR RND (16) 

1140: FRINTE440.'" a BR Ga m 
1150 COLDUR RNDII1&) 

lISCH FRINTGMEO.L.F SAN BE Bm m mm TE I BE I 
11702. 20LOURÜ.RNDIILO) 

1150. FRINT@7ZOs"DRUECKE EINE TASTE ZUM START " 
11970: COLRURERNDALE. 

1200 KRENTESRD EN ww (8) iG5) 1954 BY SASCHA GREBE" 
1210 : 2. 

20 
1220 
1240 
1250 
1250 
1270 Bin en 

1280 PLAYER. 2,4,0) De 

1270 COLOURIS 

1300 CES: 

1310. FRINT@40. "DIESES FRÜGRAMM WIRD IHNEN SEHR HELFEN: "3 
1220: PRINT"DA MAN MIT IHM ALLE VOFRABELN VERBEN KANN. 
IFA0: FRINT@EIZEO: "SIE KOENNEN DIE VOKABELN>DIE SIE UEBEN " 
1340 FRINT"WOLLEN: DIREET VON KASSETTE LADEN:ODER" 

1350. FRINT"’AUCH EINTIFFEN UND DANN AUF KASSETE AB-" 

1360 FRINT"SFEICHERN. " 

1370 FRINT 

1290 FRINT"SIE HABEN AUCH DIE MOGEGLICHKEIT»DIE VO-" 

1390 FRINT'’HEABELN IN ELEIN - BZW. GRÜSSBUCHSTABEN "+ 
1400 FRINT"EINZUTIFFEN. AUSSERDEM KOENNEN SIE DIE " 

1410 FRINT"VOKARBELN VON KASSETTE EINLESEN BZW. AUF” { 
1420 FRINT"KASSETTE ABSFEICHERN. " | 
1430 PRINT | 
1440 FRINT ; 
1450 FRINT 

1450 FRINT 

1470 FRINT" VIEL GLUECHK Lille 
1480 FRINTE3B9> "DRÜUECKE EINE TASTE t" 

149790 ON ERROR GOTO 34500 

1500 RESTORE 

1510 FORÜL=1TOISO 

1520 READ L® 

1520 FLAY(1:4>1L8> 15) 

1540 IFINKEY$<>""THENIA20 

1550 FORODB=1TD40 


m m : u 5 
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Rn ERSTE VENEDIG EEE EN AAEEEEGE VaEEEG EEE ETUI PEREPRORFFFIFEREETETETETEETEEEERAENEEAETETETE. 


15650 NEXTOR 

1570 NEXTOEL 

1580 FLAY(1:4:4,05 

1590 FORTUT=1T01S500 

16800 NEXTTUT 

1810 GOTO1SOO 

1620 FLAY(1:4>4,0) 

1530 CLS5 

1640 GÜSUB 27506 

1550 CL5 

1550 FRINTEAO, "WIEVIELE VGKABELN MOECHTEN SIE EINTIFFEN"} 
1670 INFUTVOR. 

1580 IFVOR=VAL ("") THENVOR=I 

1670 IFVOE=ÖOTHENVOH=I 

1700 CLS 

1710 DIMDEUS (VDE) 

1720 DIMAUS$ (VGK) 

1720 ON ERROR GDTO F600 

1740  FORZ=1TDVOR 

1750 FRINTEZO: "VDEARBEL  NR."S 

17&0 FRINTELIZO. "GEBE DIE AUSLAENDISCHE FORM EIN !" 
1775 FRINT 

1750 INFUTAUSS(Z) 

17970 FRINTE440, "GEBE DIE DUETSCHE FERM EIN !" 

1800 FRINT 

LB10 INFUTDEUS$ (7) 

1820 CLS 

1830 NEXTZ 

1840 CLS 

1850 GOTDOESSO 

1850 FRINTE40. "JETZT HABE ICH DEINE GERADE EINGETIFFTEN": 
1870 FRINT"VOFABELN GESFEICHERT.NUN MUSST DU EIN-" 
1880 FRINT"GEBEN:ORB ICH DICH DIE VOEABELN IN" 

1890 FRINT"DEUTSCH ODER IN DER AUSLAENDISCHEN " 

ı 700 FRINT"SFRACHE ABFRAGEN SOLL." RE Te ae 
1910 FRINTSE3ZAG:. "ALS KLEINE. SCHWIERIGKEIT. KANNST DU. WAEH-": 
1720 FRINT"LEN.ORB ICH DICH DIE. VOEKABELN. REGELMAES-" 
19230 FRINT"SIG (NACH DER REIHE). ODER. UNREGELMAESSIG"S 
1940 FRINT" (DURCHEINANDER). ABFRAGEN SOLL. .„" 

1950 FRINT&ESOO. "WENN DU KEINE LUST MEHR. HAST» DANN TIFFE "5 
1780 FRINT" (=) EIN." 








1970 EWE=GC 

1750 FF=uü 

17790 FRINT@2880. "1 -- DEUTSCH REGELMAESSIG" 
2000 FRINT"Z = DEUTSCH UNREGELMAESSIG” 
z010 FRINT"Z -- AUSLAENDISCH REGELMAESSIG" 


2020 FRINT"4 -- AUSLAENDISCH UNREGELMAESSIG" 
2030 PRINT 

2040 FRINT"WAEHLE WAS DU UEBEN MOECHTEST." 
2050 AS=INKEYS 

2060 IFA$="1"THENZASO 

2070 IFAS="Z"THENZ11O 

z080 IFAs=" 3" THENZBTO 

2090 IFA$="-"THENISIO 

2100 GOTOZOSO 

2110 F=RND (VOR) 

2120 IFF=OTHENZ11O 

2130 CLS 

2140 FP=i 

2150 FRINT@E40: "NENNE MIR DIE DEUTSCHE FORM FUER :" 














2200 
2240 
ZERO 


NE 


, PRZO 
ZERO 
2250 


ZERO 
ZE7O 
2280 
ZRIO 
2300 
ZE10 
FERÖO 
ZERO 


ZI40 


ZEIO 


Zn60 
2370 
ZEB0 
Fr) 

ZRIO 
Fr} 

Z400 


2410 


2420 
2430 
ZA4O 
2450 
460 
2470 
2480 
2490 
2500 
2510 
AO 
230 
2540 
A5so 
2360 
2370 
2580 
2590 
ZHHO 
2610 
2620 
230 
240 
Zu50 
P&b0 
2670 
ZUB0 
2670 
2700 
2710 


{WEW) 


(WEW) 
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FRINT 

FRINTAUS$ (F) 

FRINT 

FRINT 

FRINT 

INFUTEIN$ 

IF EIN$="-"THENSSI1O 
IFEIN$< »DEU$ (F} THENSOSUR 
GOSUR?2S0 

G0TO2110 

ELS 
FORWART=1TOFO 
FRINTE489."S!EEHR GUT 
FRINT@489. " " 
FLAY(1>RND(8) »RND (7): 15) 
FLAY(1:4:4:0) 

NEXT WART 

RETURN 

CL5 

FÜRO= 1T020 : 
FRINT@SO:"FAL s & H 
FLAY{1»1. 115% 
IFPF=2THENPRINT@200, "DIE ‚RICHTIGE FORM HEISST =": 


2340:60T02120 


ryıhh 


Ib 


FRINT® FRINTAUSS$ ( 










IFFF=1THENFRINTE "DIE RICHTIGE FORM HEISST EL PRINTSPRINTDEUS ( 


IFEWE=2THENFRINTEZG Ä RICHTIGE Fon HEISST. SE PFRINTSPRINTAUS$ 


IFEWE=1THENFRINTESC CHTIGE FORM HEISST :":FRINT:FRINTDEU® 
FORR=1T0S50 
NEXT R ; 
FRINTESO," 1 
NEXTO) ei 
FLAY(1>4:4s0) 
RETURN Ü 
F=RND (VOR) 
IFF= OTHEN2480 

cLS_ 

FF= 

FRINT@40, "NENNE MIR DIE AUSLAENDISCHE FORM FUER :" 
PRINT 

FRINTDEUS (F) 

FRINT 
FRINT 
PRINT 
INFUTEIN$ 
IF EIN$="-"THEN 3510 

IFEIN$< }AUS$ (F) THENBOSUB2340:60T02500 
GOSUB2260 

S0TO2480 

FORWEW=1TOVOK 

CLS 

EWE=1 

FRINT@40, "NENNE MIR DIE DEUTSCHE FORM FUER =" 
FRINT 

FRINTAUS$ (WEW) 

FRINT 

PRINT 

PRINT 








SRSLEIZUESSHEIEISRDRLESTERDELESHERIBERIEESIUNISDERSCHSTEEAEN USER « oo 
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2720 
2730 
2740 
2750 
2760 
2770 
2780 
2799 
PEOO 
ZB10 
ZZEO 
4848) 
2840 
2850 
2850 
2870 
2880 
28970 
ZI0O0 
ZI10 
ZI2O 
29720 
2940 
2950 


2760 NE 


2970 
AI 
29IF0 
Z000 
Z010 
ZORO 
FOSO 
3040 
3050 
F0&0 
3070 
3080 
Z090 
A100 
3110 
120 
SıS0 
Z140 
ZISO 
3180 
3170 
3190 
3190 
5200 


zi10 
2 


De 


F230 


De 


Z240 


3250 


FRSO 
3270 
A280 
‚A290 
3300 
Sa10 





INFUTPFLS 

IF PL$="-"THENSSIO 

IFFL$<S >DEUS$ (WEW) THENSOSURFF340: G0TD2640 

GOSURZR5O 

NEXTWEW 

CLSSFRINT22SO. "DU HASST JETZT DIE VOKABELN 1-MAl. DURCH." 
FRINTESLO: "DRUECKE EINE TASTE !" 

A$S=INKEYS 

IFA$S=""THENZ79FO 

CLS 

BOTDIISO 

FORWEW=1TOVOHR 

ELS 

EWE=7 

FRINT@E40,. "NENNE MIR DIE AUSLAENDISCHE FORM FUER :" 
FRINT 

FRINTDEUS (WEW) 

FRINT 

FRINT 

FRINT 

INFUT TR$ 

IF TR$="-"THENSS1O 

IFTR$Z >AUS$ (WEW) THENBOSUEZTFT40:GOTO2840 

GOSUBFR&O 

KTWEW 

GSOTOF770 

FRINTE4O. "WOLLEN SIE VOKARELN EINLESEN 7 (J/N)* 
AS=INKEYS 
IFA$=""THENZYIO 
IFA$S="N"RETURN 
IFAS="I"THENGOTOFOSO 
FLAY(1:4,4,15) 
FLAY(1,4:4x0) 
GOTO2I9YO 

ELS 

FRINT 

FRINT 

FRINT 

FRINT 
FRINTBAOO,: "STARTE DEN REKORDER- Dann DRUECKE RETURN" 
AS=INKEYS$ 

IFA$=""THENZLZO 

FRINTESS,. "+" 5 

INFUT#-1> VOR 

FRINT&E39,. "4" 

FRINTES9," " 

IFVOK=ÖOTHENVOK=1 

DIMAUSS (VOK) 

DIMDEUS (VOK) 

FORA=1TODVOR 

INFUT#-1: AUSS$ (A) »DEUS (AM) 

FRINT@ES9, "" 

FRINTESEF," " 

NEXTA 

FORXFX=0TOSO 

FRINT@ESIS»- "ALLES D.K." 

FRINTEB1S:" „ 

FRINTEBIS, ' icmERzEmEn | 

NEXTXFR 

ELS 













COLOUR -GENIE 


SCHMIDTKE 


electronic 
Büro- und Personalcomputer 


Sandkaulstraße 84 - Telefon: 0241-232 17 
5100 AACHEN 


SOFTWARE 


Pneu 


AKTUELL 
PREISWERT 





Wir senden Ihnen gerne unseren Softwarekatalog mit über 100 Programmen! {Natürlich kostenlos!) 


PROTHEUS 


PROTHEUS - Schach Ist eine Konsequente Weiterentwicklung des 
Programms CO-Schach und bietet gegenüber diesem, neben seiner 
Spleistärke, einen wesentiich höheren Bedienungskomfort und 
ein# verbesserte Brafikdarsteliung, Vorteile von PROTHEUSı 


7 Splelstäirken 

- Brettdarstellung in hochauflösender Grafik mit 
weuent| Ich besserem Design der Figuren, 

- Automatische Brettdrehung, d.h. der Spieler spleit 
Immer von unten nach oben. 

- Mögiichkeilt der Zugrücknahme. 

- PROTHEUS erkennt automatisch, ob ein Drucker ange- 
schlossen und eingeschaltet Ist, und protokoltiert 
die Züge. 

- Butes, Immer wechselnde» Demonstrationssplel. 

- Einfacher#es Verfahren beim Aufbau einer 
Problemstellung. 

- Sichern und Laden von Spielsituationen auf Kassette: 

- Unterschledliche Darstellung der Figuren bei Farb - 

oder S/U - Fernsehgeräten, 


Protheus wurde an SARGON II angelehnt und bezitzt eine enorme 
Spielstärkej so schlug es In einem Testspiel das Colour-Schach 
(von TCS) obwahl dieses mit weiß spielte. (von Gerhard Wolf) 


Art, 892 SeS 59.- DM 








OTELLO 


Diesen Spiel ist auch bekannt unter dem Namen ’Reversil, 

‚Auf das schachbrettähniiche Spielfeld müssen Sie ibwechseind 
mit dem Computer einen Stein Ihrer Farbe legen. Die gegnerlsch“ 
en Steine, die zwischen Ihrem zuletzt gelegten und einem ander- 
en Ihrer Stein®s Ilegen, erhalten dann Ihre Farbe. Ziel ist es, 
zum Schluß (d.h. wenn alle Feider bezetzt wind) möglichst viele 
Steine der eigenen Farbe zu haben. Verschirdene Schwlerigkelts- 
grade sind vorab einstellbar. 

(Ptortner) Art. 837 5eS 25,- DM 














TRASMAN SR 


Eine neue Spielldee: haben Sie ein gutes Straßengedichtnis, 
sind Ste reaktionsschnell , können Sie vorausdenken und den 
Gegner in Sackgassen locken, um Ihn dann einzumauern? Denn 
geschossen wird In diesem Spiel nicht. Als Hillmann müssen 

Sie In einer großen Stadt alle Mjlltonnen einsammelin, dabei 
sehen Sie Jedoch nur gerade ihre nächste Ungebung auf dem 
Blldschtrm. Als erstes müssen Sie die Tankstellen finden, 

bei denen Sie dann regelmäßig auftanken. Sodann dürfen Sie 
sich nicht verirren, um schnelf genug zur Tankstelle zurück 
zufinden. Ihre einzige Möglichkeit mit den Verfolgern fertig 
zu werden }st Ihre Intelligenz: Sie können Mauern bauen und f 
Ihre Gegner so abhängen oder gar völlig einmauern. Auf einem 
Radarschirm können Sie die Position ihrer Gegner grob abschät- 
zen. Hervoragende Grafik und toller Sound lassen dieses Spiel 
zu einem faszinierendem Abenteuererlebnis werden, Ein absolut 
empfehlenswertes Spiel mit sehr hohem Programmieraufwand. 

(von Patric Thomas) Art. API SeS 57.- DM 


COLOR-QUBERT BER 


Qubert, das kleine Minnchen auf der Pyramide, hat bereits 
unzählige Herzen der ATARI-Telespielfreund®e erobert. 

QUBERT - JETZT AUCH FÜR IHR COLOUR - GENIE 

Ein Männchen steht auf einer Stufenpyrramide und muß nun von 
Stufe zu Stufe springen. Erst wenn er jede Stufe mindestens 
einmal erreicht hat, Ist er zufrieden. Dies ist aber gar nicht 
so einfach, da er dauernd auf hüpfende und herabfaltlende Sachen 


‚achtgeben muß. Auch hier zählt Intelligenz und Reaktionsver- 


mögen; es wird nicht geschossen! (von Patric Thomas) 
Art. 895 Se5 a9. 04 


COMPUTER-FRUST 


Das wahnwitzige Strategiespiel ! (von Frank Marmor) 
Auf.einem großen Gelände sind Punkte und Hindernisblöcke \ 
verstreut. Sie müssen taktisch geschickt Ihre Gegner hinter 
diese: Hindern!sse locken um Punkte zu sammeln und den Computer 
zu:frusten ! Geheimschätze bringen Punkte, können Ihnen aber 
such.das Leben schwer machen. Sie können zwischen drei 
Spietverstonen mit Jeweils drei Schwierligkeitsgraden wihlen. 
Auf-iWunsch: verrät Ihnen der Autor gerne einige strategische 
Tips.wie. Sie den Computer frusten können. 
Art. 844 Ss5 39,- DM 


M.A.D: (Missile Attack and Defense) 


Wieder #in tolles Video-Action Spiels Verteidigen Sie eine 
Stadt gegen herabfallende Raketen. Das beKannt®e Telesplel in 
einer Colour-Genie Version mit überaschender Grafik. Trotz der 
hervorragenden Qualität haben wir es geschafft, dieses Spie) zu 
#inem ungewöhnlich niedrigen Preis anzubieten. 


St. Sicurella) Art. 117 3e5 29, DH 
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DREI EEE ara ETEARNDVFFE DEF REEL EEE FETTE EEE EEE ONE EEE RR SCNESNERAER ABENTEUER TIERE RACE EA 


FAZO 


SS30 


3540 
E30 
E60 
3370 
3380 
EEI0 
400 
3410 
420 
3430 
3440 
3450 
5460 
5470 
3480 
3490 
SSO0 
A510 
(2) 


GUTOI19ISO 

FRINT"WOLLEN SIE DIE VOKABELN ABSAVEN 7 (J/ND"S 

AS=INEEY$ 

IFAS="I"THENFESO 

IFA$="N"THENCLS:GOTOI1860 

GSOTD 3340 

ELS:FRINT"STARTE DEN REKORDER:DANN DRUECKE RETURN" 

AS=INKEY$ 

IFAS=""THENISIO 

FRINT#-1: VDE 

FRINTES9: "+" 

FRINTESP," 

FORG0S=9T050 

NEXTGOG 

FORA=1TDVOR 

FRINT#-1, AUSS (A) »DEUS (A) 

NEXTA 

ELS 

GOTD19S0 

ELS:PRINT"WEITERMACHEN (1) <s NOCHMAL STARTEN 
ALLES LOESCHEN (9) BASIC 


FROGRAMM LADEN (4) MASCHINENSFRACHEFROGRAMM LADEN (52 


SI20O 
>I20 
3540 
SII0 
3560 
33570 
SI80 
3570 
3600 
S6s10 
Euro 
SA0 
S6A0 
I6SI0 
Sba0 
3670 
3680 
A670 
3700 
3710 
5720 
37320 
3740 
3750 











AS=INKEYS 

IFA$S="1"THENCLS: GOTO1FSO 

IFA$="2'"THENRUN 

IFA$="3" THENCALLOOOO 
IFA$="4"THENCLS:CLOAD 

IFA$S="5G"THENECLS: SYSTEM 

GOTOFSZO 

ONERRORBOTO1&O 

cLs 

FÜRGUS=-OTOIOO 

NEGRD 

RGRD 

NEGRD 

FLAYtL>RND(B) »RND{12) :15) 

NEXTGUG 

FLAY(1:4:4>0) 

FRINT 

FRINT 

PRINT 

FRINT"ES IST EIN FEHLER AUFGETRETEN. 11" 
FRINT"DU HAST WAHRSCHEINLICH EINE ZU GROSSE” 
FRINT"ZAHL ODER EIN ZU LANGES WORT EINGEGEBEN. ": 
A$S=INKEYS$ 

IFA$< >" "THENRUNELSES740 








1ieren - Profitieren 


Bei jeder Ausgabe drei Zeilen kostenlos inserieren!!! 


Also: Füllen Sie die eingeheftete Bestellkarte aus, und sichern Sie sich Ihr persön- 
liches GENIE DATA Abonnement 
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GENIEDÄIN Asonnement BESTELLUNG GENIEDATN KLEIN-ANZEIGEN-BESTELLUNG 


Bitte veröffentlichen Sie nachstehenden Text in der 


Hiermit bestelle ich Abonnements) der Zeitschrift nächsten Ausgabe von GENIE DATA unter der Rubrik 
GENIE DATA, Kleinanzeigen. 


Bei ABONNENTEN unbedingt ABONNENT hin schreiben 
SONST: ERFOLGT RECHNUNG ! 











“Mir ist bekannt, daß ich das Abonnement zu jedem Quartal, 
jeweils 6 Wochen vor Quartalsende, kündigen kann. 






Der Bezugspreis beträgt innerhalb der BRD nur DM 59,40, 
pro Abonnement. (Sechs Ausgaben) frei Haus, 


Die Bezugsdauer verlängert sich nach Ablauf eines Jahres um 
weitere 12 Monate, solange bis das Abonnement gekündigt 
wird. 


Mit obigen Bedingungen erkläre ich mich Einverstanden: 


Unterschrift: Datum: 


Bei Jugendlichen unter 18 Jahren, Unterschrift eines 
Erziehungsberechtigten! 








ee Unterschrift Datum 





: Mit meiner Unterschrift versichere ich, keine urheber- 
rechtlichen Bestimmungen zu verletzen. 


GEMEDÄIN Kontact-Karre GEMIEDATN 


Ihr Inserat in der GENIE DATA Nr. hat meine Beachtung Reservieren Sie uns bitte angekreuzten Platz für ein Inserat 


nenn 


gefunden. zum Erscheinen in der nächsten GENIE DATA. Unsere Satz- 
vorlage, bzw. Film, geht Ihnen umgehend zu. 


O \1ISeite O 1/8 Seite 
O 1/2 Seite O Wir sind interessiert an Kleinanzeigen 
Artikel O 1/3 Seite O Bitte, senden Sie uns 
O 1/4 Seite ihre Anzeigenpreisliste zu ! 
GENIE DATA 
O WER-WAS-WO-Einkaufsführer 


Inseratgröße 55x45 mm DM 55,-- + 14% MWSt, 
abzüglich 10% Rabatt für 6x Erscheinen. 
Satzkosten für 4 Zeilen einmalig DM 15,-- 

Jede weitere Zeile Satz kostet DM 7,50 





Hiermit bestelle ich zur schnellstmöglichen Lieferung: 


O Neusatz muß 
von Ihnen 
erstellt werden ! 





Unterschrift: Datum ; 
Bei Jugendlichen unter 18 Jahren, Unterschrift eines 
Erziehungsberechtigten. Unterschrift Darm 
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Ulrich Groke 








Mensch ärgere dich nicht für das | 
Colour Genie. Da sich dieses Pro- 
gramm komplett selbst erklärt, 
wollen wir uns hier auch nicht lan- 
ge. mit. einer Vorrede aufhalten, 
nur.-vielleicht kurz dazu, was es 








30 CLS2LGRICOLOURZICLEAR 74 alles kann. 
51 FEEYi="RUN Das: Programm stellt in an- 

352 FEEYZ="RUN: sprechenderweise ein Spielbrett 
53 FEEYZ="RUN auf..dem..Monitor dar. Man kann i 
54 FEEY4="RUN nun. mit: bis:zu. vier Spielern spie- | 
SS FEEYS="RUN len, oder. man. kann einen oder | 
56 FEEY&4="RUN mehrere: Spieler. durch den Com- : 
57 FEEYS="NEW puter simulieren. lassen. Besonders i 
S=5 DIM FA(4),»F1$(4),88(4):5851(4) interessant ist.es, wenn der Com- 

s7 Fi$(De'"l Pi Deriixfisis Sn puter alle Spieler.übernimmt, und 

SO FALISTEFACHI=SLEFALTEI FB FAlH)=D alleine spielt. 

il S5(1)=E1l8LESI2I >77: 9513275 7255143=721 

2 DIM ZA ZELLE Y2(4» 4) X(56:2)>Y1(4:4),Y1(4,4):5(4) 

6: DIM Bls&t424): 

64 DATABSSF7:7ZT> 697; 617.537.535, 333, 531:529:449, 269: 57123735379»377>297 


»217:1372.057:059:061x2141>221: 301; 381: 38T: 785: 387: 389: 469. 349.547: 545»5 
+2:541>6212701:781:861:.839:779:699:619: 5329: 451: 455. 455; 4537:139: 219: 2997 
379: 467, A659: A632, 461 


O5 
je = 
&7 
68 
&%7 
70 
71 


DATAO49,051:129:131>067: 


[=0 

DIM FL(4) 

GOTG 313 

ELS:LGER:GOSUR 78 

SOTD 9% 
DATAOOO: 000: 000,007, 015 


DI u: 240: 224: 
DATAL2B> 064: O32: ORT: OSP > 


DATAI27:066> 680, 000: 000; 
DATAOO1 002; 004.004: 004: 
DATAOOO: 000: 000: 000; 000: 


DATAL29:. 066: 060: 000: 000: 
DATA129: 066: 036: 036: 036: 


DATA129: 086: 060: 080: 080; 
DATA129: 066; 060: 040: 060; 
* DATAOOO > 000, 000: 000, OOO> 
DATAO00: 000: 000. 000:.000:1 
3 DATAZZ4:192: 128: 000,000; 
DATAO07 003, 001, 000: 000; 
DATAO07: 003: 001: 000; O00Q> 


069;147:149:787:789,0967:867:769:771:849: 851 


»‚ 028: 024.024 
2 DATAOOO, 000; 000, 224» 240: 
DATAO?4 > 024 » OPRB>0 15:007> 


056» 024:024 
000: 000: 000 
000. 000,000 
032064: 128 
OO0O.: 000: GOOGO 
004.002, 0014 
060:066:129 
060: 065: 12% 
026:066:127 
060,066: 129 
060.066: 129 
001003: 007 

28.192.224 
000, 000; 000 
000,.000:000 
001.003: 007 
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38 DATAOOO: DOCH DIDI: OOODODA LEI: AFEN ERE 
397 DATAFEA. LITE: LER, DOC. OOo 1LEB- 1972: 224 
90 DATARERIL: 195: 1 79a OO DOC DOC. OU. Gh 
71 DATACSS, Od: 1 EN, OOA DACH DS: VE. OO 
GE DATADSS» OU, DAR: 068: 068: 058. Öl. Mc 
DATAOGL OOF,ÜÜS- 017: 024: 045, 095: 19 
54 DATALZE> 1972: 096: 048. 024,012: DÜb UNE 
75 DATA192: 096: 048. 024. O1. UOS. OUT, OOL 
95 DATAOOF: OO6.012.:024,048:.0968, 1 IF. LTE 
77 TATAOSS: 000,096: 0688: UAB: 68: Oh: DUO 
983 CHARE:FORAZERHFIOÖTGEHFADTIREADEX: FOKEAZ » BZ: NEHTS RETURN 











79 CLS:COLOUR4:FRINTB44: "= Mensch ":CHR$ (148) 2"raere Dich nicht + 


W850 KCOLOURZAFRINTEITD. "seechrieben von Ulrich Groke >» D"sCHR&i1495: 


101 COLOURZ:FRINTEIFE. "SFIELANWEISUNG” 
192 COLOURF:FRINTEESZ 





35 H 
3 





"ro 


ı55 COLDURA:FRINTEACH, "Spielereinsabe": FRINT"O BUCHSTABEN = Spieler w 


ird "SCHR$ (149% "bersansen":FRINT"i BUCHSTARE = Computer spielt" 


104 FRINT” NAME = mamımal & Buchstaben ":FRINT:FRINT’EsE m’sÜuHhrRs$ 
{149):"ssen Namen mit verschiedenen Ant ansansshbuchstäaben sem"3CH 


R$e1l453: "Alt werden.” 

105 FRINTSFRINT"W"SCHRS 1A) N" rfeln mit der Leertaste 
105 FRINT!FRINT"5Setzen der Fiaur mit den Zahle I - # 
157 COLQURA:FRINT@9E7, "Weiter mit der Leertasta'"s 

108 AS=INKEYS: TFA$I:" " THEN 108 ELSE 110 

107 REM HIER BEGINNT DER ROTTEIL 

110 GOSUBE4425 CL5:COLOURTIFRINTEF. CHRSE{IES)S" PECHRSCLSS: 
111 FRINTBAS.CHRS (14) 5” SEHRSEEZIEN "SCHR$EILZZDD 

112 FRINTEBTF:CHRS (136) 8” "SCHRS (156) 

112 FRINTEILZB-CHRE 124) 3" "TICHREUIFTMI ES" "ECHRECLFE 

114 FRINTEISTF:CHRS LIEBES" "ICHRSLLID 
115 FRINTE41O,CHRSI140) 35 "SCHREIL4SIE 
116 FRINTE450, CHRS$ 1139 2" TICHRS IL HE 
SHR$S (LESE) = mo 
117 FRINTEZ9D,CHRS (LAEI E TCHREL TATEN 
1i1& FRINTEEZ2F, EARRTISEN. DE 

119 FRINTEFSS, CHR$SILTAN: 

120 REM HIER REGINNT DER WEISSTEIL BERRSERDE, ie 

121 COLOURI:FRINT®ETI:CHREKAFSNT ECHRE EL 35%: USCHREi 125) 5 
122 FRINTESE: CHR (132) 3" EHRE SCHASULETIE" "ECHRS (LTD) 


EHRSILAS) 










NEchRe (a7) 












.22 FRINTE9IB: CHR$ (140) ES CHRELLTERISCHRE LA LI" "SCHREALTEIE" PICHRS 


(136) 
124 FRINT@145.CHR$ (124) " "ICHRELATT)E" "SCHBS(LZID 


125 FRINT@17B> CHRS$ (144) 3: CHRS (1LTBI SCHRS (1463) 3 " "RCHRS(1IEII SE" "SCHR 


122) 

1265 FRINTEZSB: CHRS$ (144) 5 CHRS (LIE) SCHRS$ (146) 
127 FRINTEZES. CHRS$ (144) S CHRS$ (138) 5 CHRS$ (1468) 
128 FRINTE419. CHR$ (1272) 

127 REM HIER BEGINNT DER BLAUTEIL 


120 COLDURS: FRINT@422, CHRS (145) 2" "ECHRE(145) 3" "SCHRSCL4SIE" "SCHRS CL 


415 

151 FRINTE4SOSCHRS(LTA) SE" "SCHRELLTP) SE" PSCHRS(LIF) SE" PSCHRECLIPNE" 
CHRS$ (139) 

ıISZ PRINTESOZ:> CHR$ (147)5" "SCHR$(147) 3" "SCHR$(147) 3" "SCHR$ (1472) 
135 FRINTESSO> CHR$ (132) : FRINTES89 , CHR$ {1235) 

134 FRINT@747.CHR& (135) 5" "SCHR$(135 

155 FRINTE788> CHR$ (134) 5" "SCHRS (LET) ES" "CHRSCLTR) 

126 FRINTE8Z7:- CHR$ (126) 3" "SCHR$(1I6) 

137 FRINTEBA6. CHR$ (134) 3" "SCHRS (LIT) SS" "SCHRS (IE) 

138 FRINTEIO7:CHRS(LTII ES” "SCHRE (LITE 


I 
* 











GENIE DATA 61 


IRRE EEE ENEORRERNEENEERTRHETEINERTEERORENELEERNERH NEDERLAND AFEEETERREEEREEEEN GETRETEN TTAFEALENEATEEETEEETEETEETEFEEE TEE. 


159 REM HIER BEGINNT DER GSRUENTEILL 

140 CDOLOURE#FRINTE@499, CHR$ {1 IS) :FRINTES7B» CHR$ (144) SS CHR$ (1IB8) SCHR$ (146 
’ 

141 FRINT@6FS, CHRS$ (144) SCHR$ (138) 5 CHR$ (146) 


142 FRINTE7ZISCHRE (III ES” "ECHRS (IST ES" "3 CHR$ (144) ; CHR$ (138) CHR 
51146) 

142 FRINT@E768: CHR$ {134)3" "SCHREISTIE" "SCHREÜLZEN 

144 PRINTE786-CHRS$ (134)5" "SCHRSCLFIS" "ECHRS$ (LIED 

145 FRINTESOIF:CHREILSGI SE" "SCHRSCIIGI EN" "SCHR$ (14) ECHR$SAELZS) SCHR 
$(142) 

1458 FRINTEB48:. CHR$ 124) 2" een "SCHR$ (12) 3" "SCHRS (134) 
147 FRINTE889: CHR$ (139) 5" "SCHRS(1IDDS "SCHRS$ (LITT) 

148 COLDOUR4:PRINTE17.CHR$S (1ISI 3" "SCHRE(IES) 

149 FRINTESS. CHR$ (124) 3" "SCHREIIEND ES" "SCHRESULSN 


150 FRINT@97: CHRS$ (138) :FRINTEIOL,CHRE (128) 

151 FRINTEIS6: CHRS$ (134)5" "ECHRSCIETIS"OHSCHRS (LET) SS" "SCHR$ (LEN) 

152 FRINTEL77>:CHR$ (128): PRINTEIBS1:- CHR$ (178) 

152 FRINT@E218; CHR$ (134) 3" "SCHR$(127)2" "SCHR$(1SIE" "SCHR$ (122) 

154 FRINT@249: "Mensch "CHRS (138) :FRINTE2AL:CHRS (138) 3"  "SCHRSEIIAB) ES" 
rsere" ra 

155 FRINT@296, a... SEHR tiS/27 "SCHRS(IETIS" "SCHR$ (132) 


156 PRINT@SSI.CHR$ (13 "SCHRSCATSIS" "SCHRS(135)2" "HCHR$(1IB)EFRIN 
TE241.CHR$ (138) 5" "SCHRE SS) H" "SCHRSCLES)H" "SCHRS13S)E" "SCHRS(1SS 
} . 

157 FRINT@STO-CHRE(ISPE" VECHRSCLINE" "SCHRSEALSSIE" "SCHREAIDS" "3 


CHR (137) 5° ee "SCHRSCISPIR" "SCHRSLIINEN" "SCHRSLIIN) ES" 5 
CHRSCIZP)E” "SCHRS$ (LED 

158 FRINT@409, ns es speak. EHR$ 136): FRINT&413. CHR$ (136) :PRINTE 
415.CHR$ (136): :FRINTE@417 , CHR$ (136) :FRINT@421: CHR$ (136) :FRINTE425: CHRS$ (1 
36) :FRINT@425, CHR$ (136) : FRINT@427 : CHR$ (136) :FRINTE@429, CHR$ (1238) 

159 FRINT@448, EHR$ (124) : PRINTE470, CHR$ (152) 

180 FRINT! 89; EHRSCLSBIEFRINTE491: CHR$ (136) + FRINT@49%3- CHR$ (136) :FRINTE 
A95n CHR$ (156): PRINT@497  CHR$ (156) :FRINT@SO1» CHR$ (136) :PRINTESOS> CHRS$ (1 
a6): FRINTES 05, CHRS$ (136) : FRINTESOT: CHR$ (156) : PRINTES09, CHR# 1158) 

161 FRINT@ES28. CHR$ (134) 8" "SCHRS (LEN :" "SCHRSECISN) ES" "SCHRS(IINE" "3 
CHR$(13F) 3" NSCHREALETIEN "TSCHRSCLZSTIE" "SCHRE(LIIE" "ECHRSÜLINE" "5 
CHR$(139)3" "ICHRSLIINI 

182 FRINTESSF:CHRE LIT SE" "’SCHR$(1ET)S" PSCHR$(IID ES" "SCHRECLIII EV 5 
CHRS$ COIZSBIESFRINTESBI: CHRS (138) 8" "SCHR$ (LEI "OO" SCHRS (13T) ET SCHRE(1IN 
) 








1683 FRINTE&18: CHR$ (124) 5" "SCHR$(IETIS" "SCHRS(LTTIE" "SCHRS(1LI2) 
154 FRINTE649. "Dich ":CHR$ (138) : FRINT@581 » CHR$ (138) 3" nicht" 
185 FRINT@ES9&. CHR$ (134) 3" PSCHR$(IST7)S" "SCHR$(LETYER" "SCHR$(1I2) 


166 FRINTE737: CHR$ (138) :FRINT@741> CHR$ (128) 

187 FRINTET76: CHR$ (134) 3" "SCHRS(137)3" "SCHRS(ITTIS" "SCHR$(1ID) 
188 FPRINT@EB17:CHR& (138) 5 FRINT@BZI:CHRS (138) 

169 FRINTESSE: CHR$ (AFP) 5” "SCHRS(I IN E" "ACHR& (132) 

170 FRINTE899: CHR$ (132) 5" "5CHR$(1IT) 

171 GOSUR FI6 

172 G0TD 220 

173 FRINTEZTE»" 5 

174 IF StJ)=1 THEN FRINTEZT7E, "COMF."5B1$(J,1) 

175 IF S{WJ)>1 THEN FRINT@272:AS(D) 

17& A=FEEK(-1984): IF A=128 THEN 186 ELSE 177 

177 IF A=24 THEN S(J=Z:FRINTESS(J)»"H"SIF LEN(A$(J))>1 THEN FRINTESS( 
DV." 


178 IF A=9& THEN S{J)=1:FRINTESS(JU)- "E"RIF LEN(A$(JI)=1 THEN PRINTESS 


179 IF J=1 THEN FRINTEIO,"O":FLAY(1:7:1» DEIFSCLI)=ITHENIB& 
180 IF J=2 THEN FRINTE1OB. "WS FLAY(1»4:1» DEIFSCH=1THENIB&A 











62 GENIE DATA 





181 IF J=3 THEN FRINT@EBEB: "PH": PLAY(1:5:1: 5 IFSCH=1THENIB& 


182 
183 
154 


186 


IF J=4 THEN FRINTESIO: 


FORA=1TOIO:NEXTA 


FRINTE9O." "=FRINTEIOB:" "EFRINTEBES: " 
185 FLAY(1:1:1:0):60T0 176 


FRINT@FO," ":FRINTELOS." "AFRINTESZB: " 


OÖ) :COLOUR FA) 


187 
188 
189 
190 
191 
192 
193 
194 
175 
19765 
197 
1978 
199 
ZOO 
zol 


2072 


FRINTEESZ> CHR$S (150) 5 





"SCHR$&(1S1) 


FRINTESIZ:"T® “rn 


FRINTE432; "3 
FRINTE472:."1# 
FRINTES1Z2: "1 


p' 
> 
I 


FRINTESSE: "I® “1 


FRINTESIZ: CHRS (15 
FORA1=1TOS 


DOLDOUR FALJISFORA= 


FRINT@472, "0 #®" 
FORA=1TO10:NEXTA 
FRINT@473; " e 
FORA=1TOLO:NEXTA 
FRINTESIS,TO 0" 
FRINTESSE," 


Z02 FORA=1ITDLOSNEXTA 


BO: 
2064 
205 
=0& 
207 


ZU8 NE 


207 
iO 
sit 
212 

213 

214 
219 
216 
217 
=18 
219 
ZEO 


Leon 


mn 
in 


224 


m ze 
225 


ab 
227 
228 
22% 
1) 
332 


me 
LH 


a4 


SEE 
Een 2 -. 


236 
237 
238 


23% 


FRINTE47Z" " 
FORA=ITDIOFNEXTA 
PRINTES 7 . # 
FRINTESSS> 5 
FORA=ITOLO:SNERXTA 
Tal 

W=RND (6) 


25" "SCHR$ (III) 





1TD1O NEXT A 


DON W GESUR 212: 216: 220: 224. 228, 232 


RETURN 

FRINTES9TF:> N 
FRINT&E472,:" 8" 
FRINT&ESSS" “ 
RETURN 

FRINTEI9I2,"® » 
FRINTE47S> " 
FRINTESSS> " = 
RETURN 

FRINTEE73,"# " 
FRINTEA7E:" 


FRINT@SSS," — @" 
RETURN 

FRINT@I92,"® @ 
PRINT@473: " " 


FRINTESSZ,"#  @ 
RETURN | 
FRINT@ZIS, NEW" 
FRINTBAZZ,T m 9 
FRINTESSS,"6  @" 
RETURN 
FRINTESIS,"® @ 
FRINTE473."6 @ 
FRINTESSS, "6 @ 
RETURN 


ECDLDURF:FRINTE4O: CHR$ (128) 5 
n" 

2O)5 “HH 
EDLOURI=FRINTE71.»CHR$ (1283 3" 


FRINTEBO, "A 
FRINT@12O:CHRS$ (12 





NENZBLAY(1,6r1>7)2 IFS(4)=1THENLB& 





"—CHR$ (129) 


————"SCHR$ (1312) 
EHRE 


"SPRINTEB1O." " 


":FRINTEBIO»" "SFLAYLS 1a: 





GENIE DATA 63 


IE ENTER TEE ENTER EEEEEEEEEEEEEVrE LE LIEEETEELEERGTERESTERFEEFEFRE RER STRETNETENEERTETETTeESeEee EEE 


2406 FRINT@111:H4 n 

241 FRINTELSL>CHRS (130) 5 "————" 5 CHR$ (131) 

=42 COLDURZEFRINTBE780: CHR$ 1125) 3 "————"SCHRSI127) 
243 FRINTBSOCH, "A r 

z244 FRINTES40.CHRS (LEO) 4 "-——"ICHR$ (IIND) 

=45 COLOURS:S FRINTE?7F1> CHR$ (128) 5 " ————TCHRE (19) 
245 FRINTESI1: "1 iv 

247 FRINT@S71:»CHR$ 1130) 5 "7" SCHRS 131) 


248 COLUURSSPRINTRESSE: "1." 
249 FRINTB440. "SPIELER" PRINT 
250 INFUTAIS$ 
251 an 6) 
252 SCLI=LEN (AISI:SLA=S (1) EGOSUB445 
253 Bist. II=LEFT$ (ALS: 
54 Bi$(1.-D=eRi$t1-1)5B1$11-F)=Bisi1l. 1): B18i1,4)=Rl$t1.D) 
255 IF Sil)=1THEN FRINTEBI: "COM. "SA$(1) 
256 IF 5(1):1THEN FRINTESI1:A$(1) 
257 FRINTE49- E1$ (1-1) 
258 FRINT&S1:Bl$ (1-2) 
259 FRINTEI29:E1$ (1,7) 
Z&0 FRINTEITL,BI$(1.4) 
z61 FRINTES2O," R 
262 COLOURL:FRINTETAS, "I." 
2&3 FRINTE440, "SFIELER"SFRINT 
264 INFUTA2S$ 
265 AS ID) =LEFTS$ (AD$, 6) 
256 St?) =LEN(AR$):L4=5 (2): 605UE445 
2687. Bl$iD, VD)=LEFT$ (AD$: 1) 
288. .IF/Rl$(2:1)="" THEN 270 
269 IFRBI$(2.1)=B1$ (1.1) THENGOSUB436:50T0261 
270. B1$ (2, DI =Bl$ (2. V)EB1$ (2: HD) =Bl$ (2, 1)281$ (2. 4)=El$l2.1) 
271 1F5St2)=1THENFRINTEL12: "COMF."5A$(D) 
272. IFS(ZIFLTHENFRINTELLT: A$ (2) 
273 PRINTBST>RBI$ (2:1). 
274 FRINT&E69:Bl$ (2:2). 
275 FRINTEL47.K18 (2:0 
276 FRINTELAFSBIEL? 4) 
277. BRINTES2O, Mm & 
278 COLOUR? FRINTEFOZ: "2." 
279 PRINT@440. "SPIELER": PRINT 
280.::INFUTASS 
281. A$(TI=LEFT$ (AI$: 6) 
282.S(3)=LEN (AT$) ıL4=5 (T) : GOSUB445 
283. B1$ (I: DI=LEFTE (ASS 1) 
284. IF Bi${T.1)="" THEN 788 
285 IF Bil$(Z, L)=Bi$(1: LIORB1$ (I, 1) =Ri$ (2: 1) THENGOSUB436:G0T0277 
286 IFS(3)=1THENFRINTBBT2: "COMF. "5 A%(5) 
287 IFS(P) >1THENFRINTEBIE: AS (TE) 
288 B1$ (I, D)=Bi$ (3. 1)2B1$6 (I: 5) =E1$ (3,1) 3B1$ (5,4) =Bl$ (Tel 1) 
289 FRINT@787,B1$(T»1) 
290 FRINTE789, B1$ (3,2 
291 FRINT@B67: B1$ (3:2) 
292 FRINT@869: B1$ (3,4) 
293 FRINT@S20," 1 
294 COLDUR2:FRINTESAS: "4, a 
295 FRINTBAAO, "SPIELER" SPRINT | | 





12#. 








296 INFUTA4S 

297 A$(4)=LEFT$ (A4$; 65 

298 StA4)=LEN (A4$) :1L4=5 (4): GOSUB445 
297 B1$(4:1)=LEFTS(ASS:DI 





64 GENIE DATA 


De BEN HNNINnen 


S00 
=01 


IF Bi$(4,1)="" THEN 302 


IF Bi$(4- 1)=Bi$(1» 1) ORBI1$ (4: 1) =B1$ (2, 1) ORB1$(4,1)=B1$ (5: 13 THENGOSU 


B436:G0T0295 


302 
O3 
>04 
05 
>06 
307 
208 
307 
>10 
11 
Si1z 
S13 
514 
>15 
>16 
>17 
318 
517 
320 
az2il 


ie 


ge 
23 


7 


De 

25 
326 
327 
328 
329 
SEO 
51 
332 


EEE 
ABS 


34 
va 
mE 


DE Ten 2 


36 


——. 
RR 


338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 


338 


Eil$ (4, 2)=Bi1$(4, 1):B1$(4,2)=B1$ (4, 1): B1$(4,4)=Bi$(4,1) 
IFS(4)=1THENFRINT@BOL: "COMP. "AS (4) 

IFS(4) "ITHENFRINTEBOL:A$ (4) 

FRINT@769; E1$ (4.1) 

FRINT@771,B1%(4.2) 

FRINT@849, B1$ (4,5) 

FRINTE@E851;B1$ (4.4) 

PRINTESOZ,"  " 

FRINT@440, " " 

FRINTES2O," u 

RETURN 

RESTORE 

E=Ö 

FOR I=1 TO 56:X(1,2)=0O:READ X(I»1) NEXT I 

FOR I=1 TO 4:FOR J=i TO 4 

READ Y{Is>P):2YLtI,D=Y(IsJ)ENEXT JSNEXT I 

FOR J=1 TO 4:FOR I=i TD 4:Y2(J» D)=-I:NEXT I:NEXT J 
G0T0 69 Es 
FOR J=1 TO 4 

COLOUR FA(J) 

FOR 1=1T0 S0:Hi1=X(I.1):H2=K(1:2) 
K{1»1)=Kt1I#r10: 1) IX I, D)=KiI+r10.2) 

Mt1+10, LI =H1:KX (I+10, P)=HRINEXT I 

FOR I=41 TO 52 

Hi=X (1, 1) :H2=X (1:2) 

HMiIs 1) =KLI+4. 1) XI: Z)=XtIr4»2) 

M(I+4s 1)=H1:KtI+H4, 2) =H2:NEXT I 

IF S{J)=O THEN 341 

G0SUR 342 

K=03FOR I=1 TO 4:IF Y2(9;I)>40 THEN Kek+t 
NEXT I 

IF K=4 THEN 335 

G0T0 338 
E=E+1:FRINT@EZ40O+E#80,E3".=":Bi$(J»1) 
FRINTEIIO+E#H10,E5 "="3A$ (5 

S(J)=O 

K=0:FOR I=1 TO 4:IF S(TD)=O THEN Kek-+l 
NEXT I 

IF K=4 THEN FORA=1TO2500:NEXTA:RUN 10 
NEXT J:GOTO 320 

K=0:FOR I=1 TOD 4:IF Y(J:-D=Y1(J»TD) THEN Kek+l 
NEXT I:sWwi=i 

Ki=K:FOR I=1 TOD 4:IF Y2tJ» I)>40 THEN Kil=Kiri 
NEXT I 

FOR I=1T04:IF Y2(J:I)<O THEN 348 

NEXT I 

K3=I 

K2=0 

EOSUR 17Z:Wi=Wi-+l 

IF K=0 THEN 380 

COLOUR FA(J):SIF W=& THEN 358 

IF K?=1 THEN 367 

IF Ki=4 THEN 356 

G0TD 380 

IF Wi=4 THEN RETURN 

GOTO 350 

IF K=0 THEN 380 








NIELS 


GENIE DATA 66 


Sa EEE ET aD GET SEE SIEGER 9 SEES AETEEERENEE EIER EEE BESTER RE BARRIERE EENEEST TEE SERIES EN 


359 IF XKt1:2)=J THEN 367 

360 IF Xt1,D)=0 THEN 366 

361 I2= en IF I2<=0 THEN 12=12+40 

362 IF I2>40 THEN 12=12-40 

363 FOR I3=1 TO AlF ee THEN 365 

364 NEXT IS 

365 Y(X (1:2, IM =Y1(X11>2), ID) EY2 (XD); IND =-II:BOSUB436: PRINTEY (X (1- 
2),12)-B1$(X(1:2).15) 

366 KZBiEX 1: DaJEY(I,KM=X 11: DIEY2CTSKM=1EPRINTEY (J>KI) »B1$(J>»K3) PR 
INT@Y1(J>KS)," ":G0T0 350 

367 IF kK=1 THEN 369 

Ss68 GOTD 370 | 

369 K=K-1:160T0 380 

370 IF Xt1+W.2)=D THEN 377 

371 IF Xt1+W,DI=J THEN 380 

372 T2=E1HW-(X1HW.DI-J)#10: IF I2i=O THEN 12=12+40 

373 IF I2>40 THEN I2=12-40 

374 FOR IS=1 TOD 4:IF Y2(Xt1+W, 2). 1IM)=12 THEN 376 

375 NEXT.IS 

3765 YRUHWD:IDEVYI IK IH DI a1): Yzix(1rlı 2)» II) =-13:G0SUB436: PRINTG 
Y(XtHW2) 18) ‚BiS (X (14W»2) 19) 

E77. KUIH EI SKK 14H DIEYZLIH KT) SL HWE PRINTEY (J; ka, Bi$(J:K3) 
378.Xl, 23-0: PRINTER, 1)." "RIF W=6 THEN 242. 
377 RETURN a 
380 I6=0:FOR 15 =1104: z15) Ve 
381 IF V2(J, IS) +W>44 THEN 
382 IF Y2lJ-ISI<O THEN 385 
383 IF KlY2(I ID+W.2I=J THE 
384 Iö=l6ö+l: Z(16)= 15 . 
385 NEXT IS 
386 
387 
388 FOF 
389 .FRIN 
390 F2= 
391 NEXT 
392 B=PEE 
395 
394 PRIN BRIYZIIGSZIISND DI." ® 

395 FLAY(1.1>1:0) 

296 IF B=2[Z (15) THEN Ii=Z(15):60T0 398 

397 NEXT ‚15:580T0 388 

398 FOR I15=1T016 

399 PRINTEX(Y2(J- Z(IS)):1)-B1$(J>,Z(15)) 

400 NEXT IS 

A01l GOTD 404 

402 IF W=6 THEN 350 

403 RETURN 

404 IF I6=1 THEN 409 

405 IF S(J)<>ri1 THEN 410 

406 11=Z(1):FOR I5=2 TO Ib 

407 IF Y2(J»Z(I5))>V2(J»1I1) THEN Ii=Z(15) 

408 NEXT 15:G0T0 410 

409 I1=Z(16):60T0 427 

410 IF K=O THEN 417 

411. 18=0 

412 FOR IS=1 TO 16: IF Y2(J:1IS)=1 THEN 18=2 (15) 
412. NEXT IS 

414 IF. 18=0.THEN 417 

415 IF I8=I1 THEN 427 


I EIER EEE ee Lee 

































RER SELECT SE ERSASEENEEE NEI SENAT He nn: 








FERIEN, 





66 GENIE DATA 


RENTE UNSERE EEE ea SOC SENPAAERERNEERT BEER TERTTTEREBT TUT eeze ST EEE EEE Eee EEE N ESESEIESTEEE TRETEN, 


416 GUOTO 426 
417 17=6:FOR I5= 


ı TO IssiZ1iIS)=0 


418 IF K(Y2(J>: Zt IN )+W, DI=O THEN 420 


419 17=17+1:Z1(IN=Z (IS) 


420 NEXT 195 
421 IF 17=0 THEN 427 


422 IF S5StD=l AND 17:0 THEN Il=Z1(IND:GOTO 427 


= FOR IS=i TO 17: 
424 NEXT I5 

25 IB=Z1 (RND (175) 
a26 K(Y2(J>18): HD) =0:Y(J> 
FRINTEX (YZ2(J>: I9 >; 1)" 
427 IF 
428 I2=(YA(J: ID HW- (X 


IF I1=21 (15 


"yz2ld» 18): 
KIYEAI: TDDIrW, 2) =0 
Yz2(J: ID rW,2ImddeiORIF IE 


THEN 427 


IS)=Y1(J,1I9) 


THEN 433 


429 IF I2>40 THEN I2=I2-40. 


430 FOR Is=il TO HIF YZ 


a21 NEXT IS 
S2 YOLY2(: Il)+W> 


een 


IMD=eYI IAVZ 


RIYZtIS III HW: 


(1), 
VEIT )+W, 2). IE 


IM EYEIKIYZ 
BIS IX 


ı GOSUB438:FRINTEY (I, IE) ,B1$(J: I 
=-[8:K=k+l:kl=kiel 


=0.THEN 12=12+40 


z3»13=1I2 THEN A322 


(Js Il}+W 2): 1 
(YZtd=s Il I +W»297: I 


SI RW2(G IDHW DeJEYlIs ID) SR YICTH- ID +W: DIE YZII: II) =YZCJ» ILI+WIFRIN 


TeEY(J»12)»B1$(J» Il) 
434 KIY2WJ> IL) -WıZ 
435 RETURN 


36 SOUNDI: 6: 50UNDS:» 57 SOUNDS; 11: SQUND&» 2: 
‚80: 5DUND1S>»3 


SOUND10> 24:50UNDI2 
437 RETURN 

438 FLAY(1:7»1,.12) 
4537 FORA=ITDLOO:NEXTA 
440 FLAY(1»1:1>»0) 

441 RETURN 


=0: FRINTEX(YZ 


(JIld-W 1)" 


442 FOR LS=IT08:FORL6=1TD8 


442 FLAY(1>L5:L6: 12) :FORL7=1T 


444 


445 FORLS=1TOL4 


ZA NEKTL7 


XTL&: NEXTLS®FLAY (> 1» 1>0) RETURN 


":IF.W=& 'THEN. 350 


SOUND? . 7:SDUNDB» 313 SOUND9. &1: 








446 LS=L4+1:FLAY(1>L3+L5, 12) :FORA=1TO2O:NEXTASPLAY (1»1» 1.0) 2 FORA=1TO2O 


. NEHXTA 
447 NEXT LS:RETURN 





GENIE DATA, Ausgabe 3, Jahrgang 2, 
Mai/Juni 1984 

Herausgeber: Heinz Hübben, Offsetdruckerei 
und Verlag, 5429 Marienfels, 

Telefon: 06772-1261 

Chefredakteur: Heinz Hübben 
Titatgestaltung: MH. Hübben, Offsetdruckerei 
und Verlag, 5429 Marlenfels/Ts. 

Satz: FH. Hübben, Offsetdruckerei und Verlag, 
5429 Marientels/Ts. 

Druck: H. Hübben, Offsetdruckerei und 
Verlag, 5429 Marienfels/Ts. 
Erscheinungsweise: Alle zwei Monate, jeweils 
am 15. des Monats, 

Abonnements: 59,40 DM Incl. Porto, Verpak- 
kung und gesetzt. MWSt, 

Erfüllungsort : 5429 Marienfels/Ts. 
Gerichtsstand: In jedem Fall das für unseren 
Verlag zuständige Gericht, 

Manuskripte: Unangeforderte Manuskripte 
werden nur zurückgesandt, wenn ausreichen- 
des Rückporto beigelegt wurde. Jeder Ein- 
sender erklärt sich durch die Einsendung mit 
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IMPRESSUM 


Copyright (c) 1984 by Heinz Hübben, Offset- 


druckerei und Verlag, 5429 Marienfels /T5. 
Nachdruck,. Vervielfältigung, Ubertragung:sor 
wie Speicherung: in:E£DV-Anlagen:; verboten. 


Bei Bauanleitungen: und/oder: - Programmen: 
kann für die Fehlerfreiheit keine ;‚Qarantie 


übernommen werden. 
Die Meinung der‘. einzelnen Autoren: muß 
nicht mit der des Verlages übereinstimmen: 
Anfragen an die Redaktion:bitteinür: schrit 
lich mit beigelegtem Rückporto; 


Kündigung der Abonnements: Zu: jadem Jahr, 5 
rechtzeitig, vor Ende des Jahres: (6: Wochen}. 


Jedes Abonnement verlängert: sich’ nach'Ab* 
tauf automatisch um ein Jahr: 

Sollte die GENIE DATA’ aus. Gründen; die 
nicht in der Verantwortung: des. Verlages:lie- 
gen, nicht oder nicht’ rechtzaitig:erscheinen; 
besteht kein Anspruch auf Nachlieferung. 

Für evantuelle Schäden und/oder Folgeschä« 
den an Geräten und oder Bauteilen und/oder 
Datenverlust kann keine Haftung übernom- 
men werden. Der Nachbau unserer Bauanlei- 
tungen und/oder die Anwendung von Pro- 
grammen aus der GENIE DATA erfolgt auf 


eigene Gefahr. Alle Mitteilungen erfolgen nur : 


für Amateur- und Hobby-Zwecke,. Irrtum so- 







wie alte Rechte vorbehalten. Es kann keine 
Gewähr: datlltllbernommen werden, daß die 


werwentieten:Schaltungen, Firmennamen, Wa- 
renbezeichnüngen und: alle anderen Angaben 


frei von Schutzrechten Dritter sind. 
Sämtliche: Veröffentlichungen erfolgen ohne 


‚Berücksichtigung.;eines eventuellen Patent- 
'schützes :und/ader: Gebrauchsmusterschutzes. 


Bal.allan. :Artikal-Einsendungen gehen wir da- 


"Non'aus, daß:der:Verfasser alle Rechte an der 


Einsendung besitzt,; sowie geistiger Eigentü- 


mer: ist, 


‚über Jade Artikel-Einsendung freuen wir uns! 
Honararz: Für Jeden gedruckten Artikel be- 


‚zahlen: wir: pro‘. Druckseite ein Honorar von 


80,-.DM.! 


‚Wir gestatten Jedermann, einen Artikel aus der 


GENIE:OATA! zu entnehmen, und in einer 
anderen, nicht. kommerziellen, Druckschrift 
zu’ veröffentlichen, unter der Bedingung, daß 


: an’. der: Gestaltung nichts verändert wird, das 


erwähnt wird, daß der betreffende Artikel 
aus: der GENIE: DATA entnommen wurde 
und daß man uns mindestens ein Exemplar 
der betreffenden Druckschrift kostentos, so- 


fort nach Erscheinen, zur Verfügung stellt. 











Wir präsentieren 








für DISKETTE und CASSETTE: 


ng 5 


Compile 





Nur N 32 ie 


der neue Maßstäbe setzt! 


SUPER-BASIC: 
SUPER-BASIC: 
SUPER-BASIC: 


SUPER-BASIC: 


SUPER-BASIC: 


SUPER-BASIC: 
SUPER-BASIC: 
SUPER-BASIC: 
SUPER-BASIC: 





Für DISKETTE und CASSETTE! 
Mit ARRAY-Verarbeitung! 

Das bringt kein anderer Colour- 
Genie Compiler. 

Ein Befehl wie z.B. DIM A $ (3,2,3) 
wird korrekt übersetzt. 

Mit KOMPLETTER String- 
verarbeitung! 

z.B. LEFT$, RIGHT $, MID $, 
INKEY $ usw! | 

Variablen wie im Basic! 

z.B. A9=14 oder AB $="OTTO”. 
Programme bis 300 mal schneller! 
Auf Diskettenur DM 99,-- 

Auf Cassette nur DM 89,-- 
Selbstverständlich mit ausführlicher 
deutscher Bedienungsanleitung! 


NUR BEI UNS! 


Mühlbachstraße 2 
5429 MARIENFELS/Taunus 
Telefon 06772/1261 




















gemini-10X 


Der neue STAR-Drucker. Für alle, die etwas zu drucken haben. Schneller 
und besser als bisher. 120 Zeichen pro Sekunde. Standard ASCII in normal 
und kursiv, internationaler Zeichensatz, Sonderzeichen, Blockgrafik und 
8 verschiedene Schrifttypen. Da hat man die Wahl. Auch beim Plotten: 480, 
920 oder sogar 1920 Zeichen pro Zeile auf Rollen-, Einzelblatt- oder 
Endlospapier. Mit Durchschlägen, wenn Sie wollen. Vertikal- und Hori- 
zontal-Tabulator, programmierbarer Zeilenabstand, Selbsttest und vieles 
andere mehr. 


Wenn Sie jetzt noch den Preis beachten, verstehen Sie vielleicht, warum 
wir auf unseren Neuen ganz schön stolz sind. 


Informieren Sie mich bitte ausführlich und kostenlos über den 

| | 

| STAR gemini-10X Ä TE 
| Name | 

| | 

| Siraßei in 2 Tan un ve a a | 

| | 


2 ‚COMPUTER GMBH 








Postfach 2105 
5205 St. Augustin 2 
Telefon 02241/28071 
Telex 889702 











